aboutsummaryrefslogtreecommitdiff
path: root/dot_xmonad
diff options
context:
space:
mode:
Diffstat (limited to 'dot_xmonad')
-rw-r--r--dot_xmonad/xmonad.hs.tmpl6
1 files changed, 5 insertions, 1 deletions
diff --git a/dot_xmonad/xmonad.hs.tmpl b/dot_xmonad/xmonad.hs.tmpl
index 1f424c3..d3f96d3 100644
--- a/dot_xmonad/xmonad.hs.tmpl
+++ b/dot_xmonad/xmonad.hs.tmpl
@@ -21,6 +21,7 @@ import XMonad.Hooks.DynamicLog (dzenColor, dynamicLogWithPP
import XMonad.Hooks.ManageDocks (avoidStruts, docks, docksEventHook
, ToggleStruts(ToggleStruts))
import XMonad.Hooks.ManageHelpers (isFullscreen, doFullFloat)
+import XMonad.Hooks.Place (placeHook, fixed)
import XMonad.Hooks.UrgencyHook (focusUrgent)
import XMonad.Layout.Accordion (Accordion(Accordion))
import XMonad.Layout.Dishes (Dishes(Dishes))
@@ -294,7 +295,7 @@ myXPConfig = def {
-- My workspaces
myWorkspaces = ["term", "web", "chatter", "reading", "gnus", "music", "LaTeX", "work", "radio"]
- ++ (map show [9..20])
+ ++ (map show [9..20]) ++ ["console"]
-- smartBorders removes borders when there's no ambiguity
myLayout = mkToggle (single MIRROR) (smartBorders $ toggleLayouts Full
@@ -391,14 +392,17 @@ myManageHook = composeAll . concat $
, [ className =? c --> viewShift "web" | c <- web]
, [ className =? c --> viewShift "chatter" | c <- chatter]
, [ className =? c --> viewShift "music" | c <- music]
+ , [ className =? c --> doShift "console" | c <- xconsole]
, [ isFullscreen --> doFullFloat ]
]
where
viewShift = doF . liftM2 (.) greedyView shift
+ doShift = doF . shift
floats = ["MPlayer"]
web = ["Firefox", "Firefox-esr", "Navigator", "google-chrome", "Google-chrome"]
chatter = ["slack", "Slack"]
music = ["pavucontrol", "Pavucontrol"]
+ xconsole = ["xconsole", "XConsole"]
myConfig dzenPipe = docks $ def {
workspaces = myWorkspaces