-- | On '001', i.e., getting assigned a nick, start listening for a message from NickServ
-- in case we have to identify for it.
acquiredNick :: SEvent -> Bot ()
acquiredNick (SNumeric _ 001 _) = addCallback nickservIdent >>= setGlobal handleNickservNotice
acquiredNick :: SEvent -> Bot ()
acquiredNick (SNumeric _ 001 _) = addCallback nickservIdent >>= setGlobal handleNickservNotice
acquiredNick (SNumeric _ 001 _) = addCallback nickservIdent >>= setGlobal handleNickservNotice