X-Git-Url: https://iankelling.org/git/?a=blobdiff_plain;f=subdir_files%2F.xmonad%2Fxmonad.hs;h=6a0bd5ae15d7e21d1beaaf1c1f806a3c695fb22a;hb=c1380ecb6d9f7206fcb88fc01d584143146c6a1e;hp=b9c9e64a44516ef0a8642fc22ee9c6306ba7ea98;hpb=6c41878284a2347515e54a61b5aa650f130b0a81;p=distro-setup

diff --git a/subdir_files/.xmonad/xmonad.hs b/subdir_files/.xmonad/xmonad.hs
index b9c9e64..6a0bd5a 100644
--- a/subdir_files/.xmonad/xmonad.hs
+++ b/subdir_files/.xmonad/xmonad.hs
@@ -1,3 +1,4 @@
+
 import XMonad
 --import XMonad.Config.Gnome
 
@@ -80,9 +81,10 @@ 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")
+    , ((modm, xK_3), spawn "firefox  -no-remote -P sfw")
+    , ((modm, xK_4), spawn "firefox")
 
-    , ((modm, xK_4), spawn "input-setup.sh")
+    , ((modm, xK_5), spawn "input-setup")
 
     -- we would really want to keep track of which workspace is darkened,
     -- and change things depending on where that workspace is
@@ -101,7 +103,9 @@ myKeys conf@(XConfig {XMonad.modMask = modm}) = M.fromList $
     , ((modm              , xK_Home     ), sendMessage ToggleStruts)
 
 -- disabled default of cycling windows. instead use traditional stack based alt-tab behavior
-    , ((modm,               xK_g   ), cycleRecentWindows [xK_Super_L,xK_Super_R] xK_g xK_Tab)
+-- todo, this locks up everytyhing, and the only thing that works is
+-- futher cycle key presses until i restart X
+  --  , ((modm,               xK_g   ), cycleRecentWindows [xK_Super_L,xK_Super_R] xK_g xK_Tab)
 
     -- close focused window
     , ((modm , xK_c     ), kill)
@@ -111,10 +115,6 @@ myKeys conf@(XConfig {XMonad.modMask = modm}) = M.fromList $
     , ((modm, xK_b ), setLayout $ XMonad.layoutHook conf)
 
 
---    todo, this is broken. not sure what it is supposed to do
-    , ((modm,               xK_Tab   ), cycleRecentWindows [xK_Super_L] xK_g xK_Tab)
-
-
     -- todo, make the pointer follow the window for these
 
     -- fedora's order
@@ -190,7 +190,7 @@ myKeys conf@(XConfig {XMonad.modMask = modm}) = M.fromList $
 
 
 
-    -- open workspace, and send to workspace with same key plus control
+    -- open workspace, and send to workspace with same key plus shift
     [((m .|. modm, k), windows $ f i)
          | (i, k) <- zip (XMonad.workspaces conf) [xK_f, xK_d, xK_s, xK_a, xK_z, xK_grave, xK_7, xK_0]
     , (f, m) <- [(W.greedyView, 0), (W.shift, shiftMask)]]