]> ruderich.org/simon Gitweb - config/dotfiles.git/blobdiff - xmonad.hs
xpdfrc: Allow toggling of outline.
[config/dotfiles.git] / xmonad.hs
index 1a0b498bda873dcac90c8cc150ca74fb93110ca7..df3043516ec22e996a591fb23818a7cd1295b2b5 100644 (file)
--- a/xmonad.hs
+++ b/xmonad.hs
@@ -16,6 +16,8 @@ import XMonad.Layout.NoBorders
 import XMonad.Hooks.ManageHelpers
 -- Necessary for `additionalKeys`.
 import XMonad.Util.EZConfig
+-- Necessary for setWMName.
+import XMonad.Hooks.SetWMName
 
 
 -- Prevent new windows from spawning in the master pane. Taken from
@@ -70,7 +72,7 @@ myManageHook = composeOne
     -- Wine on "4".
     , className =? "Wine"               -?> doF (W.shift "4")
 
-    -- Don't span new windows in the master pane.
+    -- Don't spawn new windows in the master pane.
     , return True -?> doF avoidMaster
     -- Prevent windows which get moved to other workspaces from removing the
     -- focus of the currently selected window. Thanks to vav in #xmonad on
@@ -99,18 +101,20 @@ myKeys = [
         , (f, m) <- [(W.view, 0), (W.shift, shiftMask)]]
 
 main = xmonad $ defaultConfig
-    -- Use Windows key as main key so it doesn't conflict with any other key
+    -- Use Windows key as main key as it doesn't conflict with any other key
     -- bindings.
     { modMask = mod4Mask
     -- Inactive borders are black - invisible on my black screen.
     , normalBorderColor = "#000000"
-    -- Active border is dark red.
+    -- Active borders are dark red.
     , focusedBorderColor = "#990000"
     -- Use my layout and manage hooks (see above).
     , layoutHook = myLayoutHook
     , manageHook = myManageHook
     -- Use unicode rxvt as my terminal.
     , terminal = "urxvt"
+    -- Necessary for Java so it recognizes XMonad as tiling window manager.
+    , startupHook = setWMName "LG3D"
     }
     `additionalKeys` myKeys