The simple Haskell XMPP bot