commit 2082839ed10d82d634a122f6500aa6a7f3f5e44d Author: Correl Roush Date: Fri Oct 14 10:49:25 2011 -0400 Initial diff --git a/xmonad.gnome.hs b/xmonad.gnome.hs new file mode 100644 index 0000000..8102580 --- /dev/null +++ b/xmonad.gnome.hs @@ -0,0 +1,23 @@ +import XMonad +import XMonad.Config.Gnome + +-- Declare config preferences +config_terminal = "terminator" -- Default terminal to run +-- config_focusFollowsMouse :: Bool -- Have focus not follow mouse +-- config_focusFollowsMouse = False + +myManageHook = composeAll + [ resource =? "Do" --> doIgnore + , className =? "Gimp" --> doFloat + , className =? "Vncviewer" --> doFloat + ] + +-- Run xmonad with the specified conifguration +main = xmonad myConfig + +-- Use the gnomeConfig, but change a couple things +myConfig = gnomeConfig { + terminal = config_terminal, +-- focusFollowsMouse = config_focusFollowsMouse, + manageHook = manageHook gnomeConfig <+> myManageHook +} diff --git a/xmonad.hs b/xmonad.hs new file mode 120000 index 0000000..2a06057 --- /dev/null +++ b/xmonad.hs @@ -0,0 +1 @@ +xmonad.standalone.hs \ No newline at end of file diff --git a/xmonad.standalone.hs b/xmonad.standalone.hs new file mode 100644 index 0000000..e05c2a1 --- /dev/null +++ b/xmonad.standalone.hs @@ -0,0 +1,33 @@ +import XMonad +import XMonad.Hooks.DynamicLog +import XMonad.Hooks.ManageDocks +import XMonad.Hooks.EwmhDesktops +import XMonad.Util.Run(spawnPipe) +import XMonad.Util.EZConfig(additionalKeys) +import System.IO + +myManageHook = composeAll + [ resource =? "Do" --> doIgnore + , className =? "Gimp" --> doFloat + , className =? "Vncviewer" --> doFloat + ] + +myBorderWidth = 2 + +main = do + xmproc <- spawnPipe "xmobar" + xmonad $ defaultConfig + { manageHook = manageDocks <+> myManageHook -- make sure to include myManageHook definition from above + <+> manageHook defaultConfig + , layoutHook = avoidStruts $ layoutHook defaultConfig + , logHook = dynamicLogWithPP $ xmobarPP + { ppOutput = hPutStrLn xmproc + , ppTitle = xmobarColor "green" "" . shorten 50 + } + {-, modMask = mod4Mask -- Rebind Mod to the Windows key-} + {-, handleEventHook = fullScreenEventHook-} + , terminal = "terminator" + } `additionalKeys` + [ ((controlMask, xK_Print), spawn "sleep 0.2; scrot -s") + , ((0, xK_Print), spawn "scrot") + ]