enterChannelListOverlayMode :: MH ()
enterChannelListOverlayMode = do
    myTId <- use csCurrentTeamId
    myChannels <- use (csChannels.to (filteredChannelIds (const True)))
    enterListOverlayMode (csTeam(myTId).tsChannelListOverlay) ChannelListOverlay
        AllChannels enterHandler (fetchResults myTId myChannels)
enterChannelListOverlayMode :: MH ()
enterChannelListOverlayMode = do
    myTId <- use csCurrentTeamId
    myChannels <- use (csChannels.to (filteredChannelIds (const True)))
    enterListOverlayMode (csTeam(myTId).tsChannelListOverlay) ChannelListOverlay
        AllChannels enterHandler (fetchResults myTId myChannels)
enterChannelListOverlayMode = do
    myTId <- use csCurrentTeamId
    myChannels <- use (csChannels.to (filteredChannelIds (const True)))
    enterListOverlayMode (csTeam(myTId).tsChannelListOverlay) ChannelListOverlay
        AllChannels enterHandler (fetchResults myTId myChannels)