]> code.delx.au - dotfiles/blobdiff - .xmonad/xmonad.hs
xmonad: emacs ediff should float
[dotfiles] / .xmonad / xmonad.hs
index 24d30bc3b501791fd18fc8d7d12e545e1757ebb3..f664fa4286ac08db9a6295b4d397e56259c41052 100644 (file)
@@ -32,6 +32,7 @@ myKeys conf@(XConfig {XMonad.modMask = modm}) = M.fromList $
 
         ((modm, xK_n), spawn "xfce4-terminal"),
         ((modm, xK_i), spawn "firefox"),
+        ((modm, xK_c), spawn "emacsclient --create-frame --no-wait"),
         ((modm, xK_p), spawn "kupfer"),
 
         ((modm .|. shiftMask, xK_c ), kill),
@@ -82,6 +83,7 @@ myManageHook =
         (isSkipTaskBar -?> doFloat),
         (isDialog -?> doFloatAt 0.1 0.1),
         (isFullscreen -?> doFullFloat),
+        ((className =? "Emacs" <&&> resource =? "Ediff") -?> doFloat),
         (fmap Just $ doF avoidMaster)
     ]
 
@@ -100,7 +102,7 @@ myLogHook hooks = do
 
 myStartupHook = do
     setWMName "LG3D" -- fix for Java Swing apps
-
+    spawn "xfce4-panel --restart" -- ensure it appears on top of xmobar
 
 goldenRatio = (toRational (2/(1+sqrt(5)::Double)))