diff options
Diffstat (limited to 'src')
| -rw-r--r-- | src/XMonad/Local/Config.hs | 2 | ||||
| -rw-r--r-- | src/XMonad/Local/GridSelect.hs | 2 | ||||
| -rw-r--r-- | src/XMonad/Local/Layout.hs | 2 | ||||
| -rw-r--r-- | src/XMonad/Local/LogHook.hs | 2 | ||||
| -rw-r--r-- | src/XMonad/Local/TopicSpace.hs | 2 |
5 files changed, 5 insertions, 5 deletions
diff --git a/src/XMonad/Local/Config.hs b/src/XMonad/Local/Config.hs index 9d3506f..3224404 100644 --- a/src/XMonad/Local/Config.hs +++ b/src/XMonad/Local/Config.hs @@ -13,7 +13,7 @@ terminal :: String terminal = "mate-terminal" xpConfig :: P.XPConfig -xpConfig = P.defaultXPConfig +xpConfig = P.def { P.fgColor = "#dfdfdf" , P.bgColor = "#3c3c3c" , P.fgHLight = "#ffffff" diff --git a/src/XMonad/Local/GridSelect.hs b/src/XMonad/Local/GridSelect.hs index 20dde76..cd4c89c 100644 --- a/src/XMonad/Local/GridSelect.hs +++ b/src/XMonad/Local/GridSelect.hs @@ -17,7 +17,7 @@ import qualified XMonad.Local.TopicSpace as Local gsConfig :: HasColorizer a => GSConfig a -gsConfig = defaultGSConfig +gsConfig = def { gs_cellheight = 40 , gs_cellwidth = 100 , gs_navigate = navigation' diff --git a/src/XMonad/Local/Layout.hs b/src/XMonad/Local/Layout.hs index 0baeb77..4b3d789 100644 --- a/src/XMonad/Local/Layout.hs +++ b/src/XMonad/Local/Layout.hs @@ -92,7 +92,7 @@ wineGameL = smartBorders $ simpleFloat ||| trackFloating Full mySubTabbed x = trackFloating $ Tab.addTabs Tab.shrinkText myTabTheme $ subLayout [] Simplest x myTabTheme :: Tab.Theme -myTabTheme = Tab.defaultTheme +myTabTheme = Tab.def { Tab.activeTextColor = "#ffffff" , Tab.activeBorderColor = "#FBAB2E" , Tab.activeColor = "#3c3c3c" diff --git a/src/XMonad/Local/LogHook.hs b/src/XMonad/Local/LogHook.hs index 5f5109f..f1310fa 100644 --- a/src/XMonad/Local/LogHook.hs +++ b/src/XMonad/Local/LogHook.hs @@ -27,7 +27,7 @@ logHook xmobarHandle = do currentWorkspaceOnTop ewmhDesktopsLogHook fadeWindowsLogHook myFadeHook - UP.updatePointer (UP.Relative 0.9 0.9) + UP.updatePointer (0.9, 0.9) (0.1, 0.1) myPP :: M.Map WorkspaceId Int -> PP myPP wmap = xmobarPP diff --git a/src/XMonad/Local/TopicSpace.hs b/src/XMonad/Local/TopicSpace.hs index 17f0e58..61ca99b 100644 --- a/src/XMonad/Local/TopicSpace.hs +++ b/src/XMonad/Local/TopicSpace.hs @@ -46,7 +46,7 @@ topicDirs = M.fromList $ , "ciV", "scrum", "BG", "witcher", "calendar"] topicConfig :: TS.TopicConfig -topicConfig = TS.defaultTopicConfig +topicConfig = TS.def { TS.topicDirs = topicDirs , TS.topicActions = M.fromList $ [ ("music", spawn "gmpc") |