aboutsummaryrefslogtreecommitdiff
path: root/.config/XMonad/lib/Hooks.hs
diff options
context:
space:
mode:
Diffstat (limited to '.config/XMonad/lib/Hooks.hs')
-rw-r--r--.config/XMonad/lib/Hooks.hs18
1 files changed, 2 insertions, 16 deletions
diff --git a/.config/XMonad/lib/Hooks.hs b/.config/XMonad/lib/Hooks.hs
index 99bb530..9464b41 100644
--- a/.config/XMonad/lib/Hooks.hs
+++ b/.config/XMonad/lib/Hooks.hs
@@ -1,3 +1,4 @@
+{-# LANGUAGE DeriveDataTypeable #-}
module Hooks where
import XMonad
@@ -14,7 +15,6 @@ import XMonad.Layout.Tabbed
import XMonad.Hooks.SetWMName
import XMonad.Hooks.ManageDocks
import XMonad.Hooks.ManageHelpers
-import XMonad.Hooks.StatusBar.PP
import XMonad.Util.SpawnOnce
import XMonad.Util.Cursor
@@ -23,19 +23,6 @@ import XMonad.Util.NamedScratchpad
import Defaults
import Scratchpads
-myLemonbarPP = def {
- ppCurrent = wrap ("%{B" ++ wsVisibleOccupiedBG ++ "}%{F" ++ wsVisibleOccupiedFG ++ "} ") " %{B-}%{F-}"
- -- , ppVisibleNoWindows = wrap ("%{B" ++ wsVisibleBG ++ "}%{F" ++ wsVisibleFG ++ "} ") " %{B-}%{F-}"
- -- , ppVisibleNoWindows = wrap "" ""
- -- , ppVisible = wrap ("%{B" ++ wsVisibleBG ++ "}%{F" ++ wsVisibleFG ++ "} ") " %{B-}%{F-}"
- , ppHidden = wrap ("%{B" ++ wsOccupiedBG ++ "}%{F" ++ wsOccupiedFG ++ "} ") " %{B-}%{F-}"
- , ppHiddenNoWindows = wrap ("%{B" ++ wsEmptyBG ++ "}%{F" ++ wsEmptyFG ++ "} ") " %{B-}%{F-}"
- , ppTitle = wrap ("%{B" ++ titleBG ++ "}%{F" ++ titleFG ++ "} ") " %{B-}%{F-}"
- , ppWsSep = ""
- , ppSep = ""
- , ppOrder = \(ws:_:t:_) -> ["%{l}"++t++"","%{r}"++ws++""]
- }
-
myManageHook = namedScratchpadManageHook myScratchpads
<+> manageDocks <+> composeAll [
className =? "discord" --> doShift ( myWorkspaces !! 9 )
@@ -52,6 +39,5 @@ myStartupHook = do
spawnOnce "polystart"
spawnOnce "nitrogen --restore"
spawnOnce "cbatticon"
- setWMName "LG3D"
+ setWMName "Anime Thighs"
setDefaultCursor xC_left_ptr
-