Skip to content

@yeban /xmonad.diff
Created

Embed URL

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
A diff of my xmonad.hs with the default one
15a16,21
> import XMonad.Hooks.ManageDocks
> import XMonad.Hooks.EwmhDesktops
>
> import XMonad.Layout.Maximize
>
>
19c25
< myTerminal = "xterm"
---
> myTerminal = "urxvt"
30c36
< myModMask = mod1Mask
---
> myModMask = mod4Mask
56c62
< myWorkspaces = ["1","2","3","4","5","6","7","8","9"]
---
> myWorkspaces = ["web","dev","3","4","5","6","7","8","9"]
69c75
< [ ((modMask .|. shiftMask, xK_Return), spawn $ XMonad.terminal conf)
---
> [ ((modMask, xK_Return), spawn $ XMonad.terminal conf)
72c78,81
< , ((modMask, xK_p ), spawn "exe=`dmenu_path | dmenu` && eval \"exec $exe\"")
---
> , ((modMask, xK_d ), spawn "exe=`dmenu_path | dmenu` && eval \"exec $exe\"")
>
> -- launch xfce4-launcher
> , ((modMask, xK_p ), spawn "xfrun4")
75c84
< , ((modMask .|. shiftMask, xK_p ), spawn "gmrun")
---
> , ((modMask .|. shiftMask, xK_p ), spawn "xfce4-appfinder")
99c108,111
< , ((modMask, xK_m ), windows W.focusMaster )
---
> , ((modMask .|. shiftMask, xK_m ), windows W.focusMaster )
>
> -- Maximize the focused window temporarily
> , ((modMask, xK_m ), withFocused $ sendMessage . maximizeRestore)
102c114
< , ((modMask, xK_Return), windows W.swapMaster)
---
> , ((modMask .|. shiftMask, xK_Return), windows W.swapMaster)
129c141,142
< , ((modMask .|. shiftMask, xK_q ), io (exitWith ExitSuccess))
---
> --, ((modMask .|. shiftMask, xK_q ), io (exitWith ExitSuccess))
> , ((modMask .|. shiftMask, xK_q ), spawn "xfce4-session-logout")
132a146,148
>
> -- to hide/unhide the panel
> , ((modMask , xK_b), sendMessage ToggleStruts)
182c198
< myLayout = tiled ||| Mirror tiled ||| Full
---
> myLayout = maximize (tiled) ||| Mirror tiled ||| Full
195a212
>
213a231,232
> , className =? "Xfce4-appfinder" --> doFloat
> , className =? "Xfrun4" --> doFloat
232c251
< myLogHook = return ()
---
> -- myLogHook = return ()
273,275c292,294
< layoutHook = myLayout,
< manageHook = myManageHook,
< logHook = myLogHook,
---
> layoutHook = ewmhDesktopsLayout $ avoidStruts $ myLayout,
> manageHook = manageDocks <+> myManageHook,
>
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment
Something went wrong with that request. Please try again.