diff --git a/xmonad.hs b/xmonad.hs
index d7c76e7..43180d9 100755
--- a/xmonad.hs
+++ b/xmonad.hs
@@ -1,6 +1,6 @@
 {-# LANGUAGE DeriveDataTypeable #-}                                                                   
 {-# LANGUAGE DeriveDataTypeable #-}                                                                   
---{-# OPTIONS_GHC -Wno-deprecations #-}
+{-# OPTIONS_GHC -Wno-deprecations #-}
 import XMonad
 import XMonad.Config.Desktop
 -- Actions
@@ -281,31 +281,30 @@ launcher = makeLauncher "-x" "eval" "\"exec " "\""
 
 
 main = do
-  sc <- IS.countScreens
-  dzenTopBar <- spawnPipe (getTopBar sc)
-  dzenBarbicanBar <- spawnPipe (getBarbicanBar sc)
-  dzenDeltachunkBar <- spawnPipe (getDeltachunkBar sc)
-  dzenFerrumBar <- spawnPipe (getFerrumBar sc)
---  dzenGammachunkBar <- spawnPipe (getGammachunkBar sc)
-  dzenOsmiumBar <- spawnPipe (getOsmiumBar sc)
-  dzenSodiumBar <- spawnPipe (getSodiumBar sc)
-  dzenTennessineBar <- spawnPipe (getTennessineBar sc)
-  dzenBlancherBar <- spawnPipe (getBlancherBar sc)
-  xmonad $ docks $ ewmh $ desktopConfig {
-    workspaces = ["shell","qb","pindrop","kofc","VM"]
-  , terminal = myTerminal
-  , focusFollowsMouse    = True
-  , manageHook = manageDocks <+> myManageHook <+> manageHook desktopConfig
-  --, handleEventHook = docksEventHook <+> handleEventHook desktopConfig
-  , handleEventHook = handleEventHook desktopConfig
-  , layoutHook = avoidStruts $ gaps [(D,108)] $ layoutH 
-  , logHook = myLogHook dzenTopBar >> fadeHook >> updatePointer (0.5, 0.5) (0, 0)
-  , borderWidth = 1
-  , normalBorderColor = "#282828"
-  , focusedBorderColor = "#ebdbb2"
-  , modMask = winKey
-  , startupHook = myStartup 
-  } `additionalKeys` myKeys
+    sc <- IS.countScreens
+    dzenTopBar <- spawnPipe (getTopBar sc)
+    dzenBarbicanBar <- spawnPipe (getBarbicanBar sc)
+    dzenDeltachunkBar <- spawnPipe (getDeltachunkBar sc)
+    dzenFerrumBar <- spawnPipe (getFerrumBar sc)
+    dzenOsmiumBar <- spawnPipe (getOsmiumBar sc)
+    dzenSodiumBar <- spawnPipe (getSodiumBar sc)
+    dzenTennessineBar <- spawnPipe (getTennessineBar sc)
+    dzenBlancherBar <- spawnPipe (getBlancherBar sc)
+    xmonad $ docks $ ewmh $ desktopConfig {
+      workspaces = ["shell","qb","pindrop","kofc","VM"]
+      , terminal = myTerminal
+      , focusFollowsMouse    = True
+      , manageHook = manageDocks <+> myManageHook <+> manageHook desktopConfig
+      , handleEventHook = handleEventHook desktopConfig
+      , layoutHook = avoidStruts $ gaps [(D,108)] $ layoutH 
+      , logHook = myLogHook dzenTopBar >> fadeHook >> updatePointer (0.5, 0.5) (0, 0)
+      , borderWidth = 1
+      , normalBorderColor = "#282828"
+      , focusedBorderColor = "#ebdbb2"
+      , modMask = winKey
+      , startupHook = myStartup 
+    } 
+    `additionalKeys` myKeys 
 
 
 myStartup :: X ()
@@ -512,8 +511,8 @@ myKeys =    [
                                                                       --ifWindows (className =? "Iceweasel") (mapM_ focus) (spawnHere "iceweasel"))
   , ((winKey .|. controlMask,                    xK_l),                                              sendMessage Expand)
   --, ((winKey ,                                                xK_1),                                              windows (viewOnScreen 0 "shell"))
-  , ((winKey ,                                                xK_1),                                              ifWindows (className =? "Alacritty") (mapM_ focus) (spawnHere myTerminal))
-  , ((winKey ,                                                xK_2),                                              windows (viewOnScreen 0 "chromium"))
+  --, ((winKey ,                                                xK_1),                                              ifWindows (className =? "Alacritty") (mapM_ focus) (spawnHere myTerminal))
+  --, ((winKey ,                                                xK_2),                                              windows (viewOnScreen 0 "chromium"))
   , ((winKey ,                        xK_a),                        do 
                                                                         windows (viewOnScreen 1 "pindrop") 
                                                                         --ifWindows (className =? "Pidgin") (mapM_ focus) (spawnHere "pidgin"))
@@ -613,6 +612,7 @@ myKeys =    [
     -- | (key, sc) <- zip [xK_w, xK_r] [1,0] -- For w,r keys in backwards order
      , (f, m) <- [(W.view, 0), (W.shift, shiftMask)]]
 
+remKeys = [(winKey, n) | n <- [xK_1 .. xK_9]]
 
 --dXPConfig = defaultXPConfig {
 dXPConfig = def {