diff options
Diffstat (limited to '.config/XMonad/xmonad.hs')
-rw-r--r-- | .config/XMonad/xmonad.hs | 51 |
1 files changed, 7 insertions, 44 deletions
diff --git a/.config/XMonad/xmonad.hs b/.config/XMonad/xmonad.hs index 095bc1e..45e0c25 100644 --- a/.config/XMonad/xmonad.hs +++ b/.config/XMonad/xmonad.hs @@ -1,53 +1,14 @@ import XMonad -import qualified XMonad.StackSet as W -import XMonad.ManageHook -import System.Exit -import System.IO --- data -import Data.Tree -import qualified Data.Map as M - --- actions -import XMonad.Actions.CopyWindow -import XMonad.Actions.CycleWS -import XMonad.Actions.GridSelect -import XMonad.Actions.SwapWorkspaces -import qualified XMonad.Actions.TreeSelect as TS - --- layout modifiers -import XMonad.Layout.Spacing -import XMonad.Layout.WindowNavigation as WN -import XMonad.Layout.Maximize import XMonad.Layout.Fullscreen -import XMonad.Layout.NoBorders - --- Layouts -import XMonad.Layout.BinarySpacePartition as BSP -import XMonad.Layout.Grid -import XMonad.Layout.Tabbed --- hooks -import XMonad.Hooks.SetWMName import XMonad.Hooks.ManageDocks import XMonad.Hooks.EwmhDesktops -import XMonad.Hooks.DynamicLog --- DynamicLog replacement(s) --- import XMonad.Hooks.StatusBar --- import XMonad.Hooks.StatusBar.PP - --- utilities -import XMonad.Util.Run -import XMonad.Util.SpawnOnce import XMonad.Util.EZConfig -import XMonad.Util.Cursor -import XMonad.Util.NamedScratchpad --- myLibs import Keybindings import Defaults -import Scratchpads import Hooks main :: IO () @@ -55,14 +16,16 @@ main = do -- lemonBar <- spawnPipe myLemonbar xmonad $ ewmh $ docks $ fullscreenSupport def { focusFollowsMouse = True - , borderWidth = 2 + , borderWidth = myBorderWidth , modMask = myModMask , workspaces = myWorkspaces - , normalBorderColor = "#130F23" - , focusedBorderColor = "#c44cf2" + , normalBorderColor = myBorder + , focusedBorderColor = myBorder' , layoutHook = myLayoutHook , startupHook = myStartupHook , manageHook = myManageHook -- , logHook = dynamicLogWithPP myLemonbarPP { ppOutput = \x -> hPutStrLn lemonBar x} - -} + } + `additionalKeys` myKeybindings + `additionalKeysP` myKeybindingsP + `additionalMouseBindings` myMouseKeybindings |