------------------------------------------------------------------------
-- Key bindings. Add, modify or remove key bindings here.
--

-- probably-broken window movement commands.  Using two competing
-- metaphors (tabs and stacks), so we do both actions.
--
windowDown = do
    sendMessage $ Go D
    focusDown
windowDown = do
    sendMessage $ Go D
    focusDown
windowDown = do
    sendMessage $ Go D
    focusDown