hush some warnings.

1 files changed, 2 insertions, 1 deletions

diff --git a/src/Network/Tox/Crypto/Transport.hs b/src/Network/Tox/Crypto/Transport.hs
index d89ac80d..634a7a43 100644
--- a/src/Network/Tox/Crypto/Transport.hs
+++ b/src/Network/Tox/Crypto/Transport.hs
@@ -32,7 +32,7 @@ module Network.Tox.Crypto.Transport
     , HasMessage(..)
     , HasMessageType(..)
     -- lenses
-    , userStatus, nick, statusMessage, typingStatus, message, action, groupChatID
+    , userStatus, nick, statusMessage, typingStatus, action, groupChatID
     , groupNumber, groupNumberToJoin, peerNumber, messageNumber
     , messageName, messageData, name, title, message, messageType
     -- constructor
@@ -559,6 +559,7 @@ msgSizeParam MESSAGE_GROUPCHAT {-0x63-} = Nothing -- variable
 msgSizeParam LOSSY_GROUPCHAT   {-0xC7-} = Nothing -- variable
 msgSizeParam _ = Nothing
 
+isIndirectGrpChat :: MessageID -> Bool
 isIndirectGrpChat MESSAGE_GROUPCHAT = True
 isIndirectGrpChat LOSSY_GROUPCHAT = True
 isIndirectGrpChat _ = False