diff --git a/xmonad.hs b/xmonad.hs index 61c75e3..d7c76e7 100755 --- a/xmonad.hs +++ b/xmonad.hs @@ -1,6 +1,6 @@ {-# LANGUAGE DeriveDataTypeable #-} {-# LANGUAGE DeriveDataTypeable #-} -{-# OPTIONS_GHC -Wno-deprecations #-} +--{-# OPTIONS_GHC -Wno-deprecations #-} import XMonad import XMonad.Config.Desktop -- Actions @@ -296,14 +296,15 @@ main = do , terminal = myTerminal , focusFollowsMouse = True , manageHook = manageDocks <+> myManageHook <+> manageHook desktopConfig - , handleEventHook = docksEventHook <+> handleEventHook desktopConfig + --, handleEventHook = docksEventHook <+> handleEventHook desktopConfig + , handleEventHook = handleEventHook desktopConfig , layoutHook = avoidStruts $ gaps [(D,108)] $ layoutH , logHook = myLogHook dzenTopBar >> fadeHook >> updatePointer (0.5, 0.5) (0, 0) , borderWidth = 1 , normalBorderColor = "#282828" , focusedBorderColor = "#ebdbb2" , modMask = winKey - , startupHook = docksStartupHook <+> myStartup + , startupHook = myStartup } `additionalKeys` myKeys @@ -423,7 +424,8 @@ myKeys = [ -- ifWindows (title =? "osmium:timetracker") (mapM_ focus) (spawnHere "urxvtc -cd ~/timetracker -e 'tmux attach -t timetracker || tmux -2 new-session -s timetracker'")) --, ((lAlt , xK_v), spawnHere "xfce4-popup-clipman") --, ((winKey , xK_x), windowPromptGoto dXPConfig) - , ((winKey .|. shiftMask, xK_x), windowPromptBring dXPConfig) + --, ((winKey .|. shiftMask, xK_x), windowPromptBring dXPConfig) + --, ((winKey .|. shiftMask, xK_x), windowPrompt def Bring dXPConfig) --, ((winKey .|. shiftMask, xK_Return), windows W.swapMaster) --, ((winKey .|. shiftMask, xK_Return), spawnHere myTerminal) , ((winKey , xK_b), do