respondToEndOfMOTD :: SEvent -> Bot ()
respondToEndOfMOTD (SNumeric _ 376 _) = do
    getGlobal handle376 >>= removeCallback
    chans <- getGlobal' autoJoinList
    if null chans then return ()
    else joinChannels chans

-- | Respond to a server PING with PONG.
respondToEndOfMOTD :: SEvent -> Bot ()
respondToEndOfMOTD (SNumeric _ 376 _) = do
    getGlobal handle376 >>= removeCallback
    chans <- getGlobal' autoJoinList
    if null chans then return ()
    else joinChannels chans

-- | Respond to a server PING with PONG.
respondToEndOfMOTD (SNumeric _ 376 _) = do
    getGlobal handle376 >>= removeCallback
    chans <- getGlobal' autoJoinList
    if null chans then return ()
    else joinChannels chans

-- | Respond to a server PING with PONG.