Initial

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
+}

xmonad.hs

@@ -0,0 +1 @@
+xmonad.standalone.hs

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")
+        ]