tons of misc updates

[distro-setup] / subdir_files / .xmonad / xmonad.hs

diff --git a/subdir_files/.xmonad/xmonad.hs b/subdir_files/.xmonad/xmonad.hs
index 6a0bd5ae15d7e21d1beaaf1c1f806a3c695fb22a..28298108f0acf900a2daa62a59824b7316c33a16 100644 (file)
--- a/subdir_files/.xmonad/xmonad.hs
+++ b/subdir_files/.xmonad/xmonad.hs
@@ -18,6 +18,7 @@ import XMonad.Config.Desktop
 import XMonad.Hooks.EwmhDesktops
 import XMonad.Config.Xfce
 import XMonad.Hooks.ManageDocks
+import XMonad.Layout.NoFrillsDecoration
 
 import qualified XMonad.StackSet as W
 import qualified Data.Map        as M
@@ -29,13 +30,15 @@ import XMonad.Hooks.SetWMName
 
 -- /usr/share/xmonad/xmonad.hs on fedora has integration with gnome etc. but I
 -- had lots of problems with gnome integration.
+myL = noFrillsDeco shrinkText def (layoutHook def)
 
 main = xmonad $ defaults
+--main = xmonad def { layoutHook = myL } $ defaults
 
 
 defaults = desktopConfig
        {
-         terminal            = "sakura"
+         terminal            = "konsole"
        , borderWidth        = 0
        , modMask            = mod4Mask
        , keys               = myKeys
@@ -81,10 +84,17 @@ myKeys conf@(XConfig {XMonad.modMask = modm}) = M.fromList $
     [ ((modm, xK_q), io (exitWith ExitSuccess)) -- %! Quit xmonad
 
     , ((modm, xK_2), spawn "pavucontrol")
-    , ((modm, xK_3), spawn "firefox  -no-remote -P sfw")
-    , ((modm, xK_4), spawn "firefox")
-
-    , ((modm, xK_5), spawn "input-setup")
+--    , ((modm, xK_3), spawn "firefox  -no-remote -P sfw")
+--    todo: clicking links in other applications won't open in
+--    a firefox opened with -no-remote, so we have to hardcode a
+--    primary firefox profile here. I'd rather have a command which
+--    sets which is the pimary for opening links. It could alter a file,
+--    and we could launch firefox with a wrapper script which looks at that file.
+    , ((modm, xK_3), spawn "abrowser -P sfw")
+    , ((modm, xK_4), spawn "abrowser -no-remote -P firefox-main-profile")
+
+    , ((modm, xK_5), spawn "/a/exe/input-setup l")
+    , ((modm, xK_1), spawn "/a/exe/input-setup k")
 
     -- we would really want to keep track of which workspace is darkened,
     -- and change things depending on where that workspace is