respondToPart (SPart (SUser nick _ _) ch@(RChannel _)) = do
    ownNick <- getGlobal' botNick
    if nick /= ownNick then return ()
    else modGlobal currChanList (delete (fromR ch))
         >> putLogInfo ("Parted " ++ show ch)

-- | If it's the bot that's been kicked, update the current channels list,
-- and rejoin the channel after a delay. If this was an autojoin channel,
-- signal UnReady.
respondToPart (SPart (SUser nick _ _) ch@(RChannel _)) = do
    ownNick <- getGlobal' botNick
    if nick /= ownNick then return ()
    else modGlobal currChanList (delete (fromR ch))
         >> putLogInfo ("Parted " ++ show ch)

-- | If it's the bot that's been kicked, update the current channels list,
-- and rejoin the channel after a delay. If this was an autojoin channel,
-- signal UnReady.
respondToPart (SPart (SUser nick _ _) ch@(RChannel _)) = do
    ownNick <- getGlobal' botNick
    if nick /= ownNick then return ()
    else modGlobal currChanList (delete (fromR ch))
         >> putLogInfo ("Parted " ++ show ch)

-- | If it's the bot that's been kicked, update the current channels list,
-- and rejoin the channel after a delay. If this was an autojoin channel,
-- signal UnReady.