Safe Haskell	None
Language	Haskell2010

Erebos.Message

Synopsis

data DirectMessage = DirectMessage {
- msgFrom :: ComposedIdentity
- msgPrev :: [Stored DirectMessage]
- msgTime :: ZonedTime
- msgText :: Text
}
sendDirectMessage :: forall (f :: Type -> Type) m. (Foldable f, Applicative f, MonadHead LocalState m, MonadError String m) => Identity f -> Text -> m (Stored DirectMessage)
data DirectMessageAttributes = DirectMessageAttributes {
- dmOwnerMismatch :: ServiceHandler DirectMessage ()
}
defaultDirectMessageAttributes :: DirectMessageAttributes
data DirectMessageThreads
toThreadList :: DirectMessageThreads -> [DirectMessageThread]
data DirectMessageThread = DirectMessageThread {
- msgPeer :: ComposedIdentity
- msgHead :: [Stored DirectMessage]
- msgSent :: [Stored DirectMessage]
- msgSeen :: [Stored DirectMessage]
- msgReceived :: [Stored DirectMessage]
}
threadToList :: DirectMessageThread -> [DirectMessage]
messageThreadView :: [Stored MessageState] -> [DirectMessageThread]
watchReceivedMessages :: Head LocalState -> (Stored DirectMessage -> IO ()) -> IO WatchedHead
formatMessage :: TimeZone -> DirectMessage -> String
formatDirectMessage :: TimeZone -> DirectMessage -> String

Documentation

data DirectMessage Source #

Constructors

DirectMessage
Fields msgFrom :: ComposedIdentity msgPrev :: [Stored DirectMessage] msgTime :: ZonedTime msgText :: Text

Instances

Instances details

Service DirectMessage Source #

Instance details

Defined in Erebos.Message

Associated Types

type ServiceAttributes DirectMessage
Instance details Defined in Erebos.Message type ServiceAttributes DirectMessage = DirectMessageAttributes
type ServiceState DirectMessage
Instance details Defined in Erebos.Message type ServiceState DirectMessage = ()
type ServiceGlobalState DirectMessage
Instance details Defined in Erebos.Message type ServiceGlobalState DirectMessage = ()

Methods

serviceID :: proxy DirectMessage -> ServiceID Source #

serviceHandler :: Stored DirectMessage -> ServiceHandler DirectMessage () Source #

serviceNewPeer :: ServiceHandler DirectMessage () Source #

defaultServiceAttributes :: proxy DirectMessage -> ServiceAttributes DirectMessage Source #

emptyServiceState :: proxy DirectMessage -> ServiceState DirectMessage Source #

emptyServiceGlobalState :: proxy DirectMessage -> ServiceGlobalState DirectMessage Source #

serviceStorageWatchers :: proxy DirectMessage -> [SomeStorageWatcher DirectMessage] Source #

serviceStopServer :: proxy DirectMessage -> Server -> ServiceGlobalState DirectMessage -> [(Peer, ServiceState DirectMessage)] -> IO () Source #

Storable DirectMessage Source #

Instance details

Defined in Erebos.Message

Methods

store' :: DirectMessage -> Store Source #

load' :: Load DirectMessage Source #

store :: forall (c :: Type -> Type). StorageCompleteness c => Storage' c -> DirectMessage -> IO (Ref' c) Source #

load :: Ref -> DirectMessage Source #

type ServiceAttributes DirectMessage Source #

Instance details

Defined in Erebos.Message

type ServiceAttributes DirectMessage = DirectMessageAttributes

type ServiceGlobalState DirectMessage Source #

Instance details

Defined in Erebos.Message

type ServiceGlobalState DirectMessage = ()

type ServiceState DirectMessage Source #

Instance details

Defined in Erebos.Message

type ServiceState DirectMessage = ()

sendDirectMessage :: forall (f :: Type -> Type) m. (Foldable f, Applicative f, MonadHead LocalState m, MonadError String m) => Identity f -> Text -> m (Stored DirectMessage) Source #

data DirectMessageAttributes Source #

Constructors

DirectMessageAttributes
Fields dmOwnerMismatch :: ServiceHandler DirectMessage ()

defaultDirectMessageAttributes :: DirectMessageAttributes Source #

data DirectMessageThreads Source #

Instances

Instances details

SharedType DirectMessageThreads Source #

Instance details

Defined in Erebos.Message

Methods

sharedTypeID :: proxy DirectMessageThreads -> SharedTypeID Source #

Mergeable DirectMessageThreads Source #

Instance details

Defined in Erebos.Message

Associated Types

type Component DirectMessageThreads
Instance details Defined in Erebos.Message type Component DirectMessageThreads

Methods

mergeSorted :: [Stored (Component DirectMessageThreads)] -> DirectMessageThreads Source #

toComponents :: DirectMessageThreads -> [Stored (Component DirectMessageThreads)] Source #

Eq DirectMessageThreads Source #

Instance details

Defined in Erebos.Message

Methods

(==) :: DirectMessageThreads -> DirectMessageThreads -> Bool #

(/=) :: DirectMessageThreads -> DirectMessageThreads -> Bool #

type Component DirectMessageThreads Source #

Instance details

Defined in Erebos.Message

type Component DirectMessageThreads

toThreadList :: DirectMessageThreads -> [DirectMessageThread] Source #

data DirectMessageThread Source #

Constructors

DirectMessageThread
Fields msgPeer :: ComposedIdentity msgHead :: [Stored DirectMessage] msgSent :: [Stored DirectMessage] msgSeen :: [Stored DirectMessage] msgReceived :: [Stored DirectMessage]

threadToList :: DirectMessageThread -> [DirectMessage] Source #

messageThreadView :: [Stored MessageState] -> [DirectMessageThread] Source #

watchReceivedMessages :: Head LocalState -> (Stored DirectMessage -> IO ()) -> IO WatchedHead Source #

formatMessage :: TimeZone -> DirectMessage -> String Source #

Deprecated: use formatDirectMessage instead

formatDirectMessage :: TimeZone -> DirectMessage -> String Source #