diff options
| -rw-r--r-- | xmonad.hs | 21 |
1 files changed, 12 insertions, 9 deletions
@@ -16,7 +16,7 @@ import Control.Monad.Trans import Data.Monoid import Ratio((%)) -import ConfigurableBorders +--import ConfigurableBorders import FullscreenManager import NoBorders @@ -27,7 +27,7 @@ main = xmonad $ gnomeConfig { modMask = modm , manageHook = myManageHook , layoutHook = desktopLayoutModifiers myLayoutHook - , startupHook = myStartupHook + --, startupHook = myStartupHook , handleEventHook = myEventHook } `additionalKeysP` @@ -42,6 +42,8 @@ main = xmonad $ gnomeConfig , ("M-<F1>", viewOrWarp 0) , ("M-<F2>", viewOrWarp 1) , ("M-<F3>", viewOrWarp 2) + , ("M-p", spawn "exe=`dmenu_path | /home/neoraider/bin/dmemu -b` && eval \"exec $exe\"") + ] `additionalMouseBindings` [ ((modm, button4), \_ -> sendMessage Shrink) @@ -61,26 +63,27 @@ viewOrWarp n = do when (s == (W.screen . W.current $ wset)) $ warpToScreen s (1%2) (1%2) -myStartupHook :: X () -myStartupHook = do - startupHook gnomeConfig - spawn "killall -u `id -un` -q xcompmgr; exec xcompmgr" +--myStartupHook :: X () +--myStartupHook = do +-- startupHook gnomeConfig +-- spawn "killall -u `id -un` -q xcompmgr; exec xcompmgr" myManageHook :: ManageHook myManageHook = composeAll [ composeOne - [ className =? "Guake.py" -?> (doFloatMaybeFullscreen <+> doConfigBorderOff) - , className =? "Do" -?> (doFloat <+> doConfigBorderOff) + [ className =? "Guake.py" -?> doFloatMaybeFullscreen -- <+> doConfigBorderOff) + --, className =? "Do" -?> (doFloat <+> doConfigBorderOff) , className =? "MPlayer" -?> doCenterFloat , className =? "Gimp" -?> doFloat , className =? "Gajim.py" -?> doFloat + , className =? "Wine" -?> doFloat , isFullscreen -?> doFullscreen ] , manageHook gnomeConfig ] -myLayoutHook = manageFullscreen $ configureBorders $ smartBorders (tiled ||| Mirror tiled ||| Full) +myLayoutHook = manageFullscreen $ smartBorders (Full ||| tiled ||| Mirror tiled) where -- default tiling algorithm partitions the screen into two panes tiled = ResizableTall nmaster delta ratio [] |