diff options
Diffstat (limited to 'src/Erebos/Conversation/Class.hs')
| -rw-r--r-- | src/Erebos/Conversation/Class.hs | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/src/Erebos/Conversation/Class.hs b/src/Erebos/Conversation/Class.hs index 77458fa..96a0e6a 100644 --- a/src/Erebos/Conversation/Class.hs +++ b/src/Erebos/Conversation/Class.hs @@ -17,4 +17,7 @@ class (Typeable conv, Typeable msg) => ConversationType conv msg | conv -> msg, convMessageText :: msg -> Maybe Text convReference :: conv -> RefDigest - convMessageListSince :: Maybe conv -> conv -> [ ( msg, Bool ) ] + convMessageListSince + :: Maybe conv -- ^ Original state to diff from + -> conv -- ^ Current state + -> ( Int, [ ( msg, Bool ) ] ) -- ^ Number of removed, list of added messages |