twin/xmonad-contrib
1
0
Fork 0
mirror of https://github.com/xmonad/xmonad-contrib.git synced 2025-05-19 11:30:22 -07:00
Code Issues Packages Projects Releases Wiki Activity

I use CopyWindow now

Browse Source
This commit is contained in:
Spencer Janssen 2007-12-07 23:40:18 +00:00
parent dc11825588
commit e85228229b
1 changed files with 7 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
XMonad/Config/Sjanssen.hs
View File

@ -3,6 +3,7 @@ module XMonad.Config.Sjanssen (sjanssenConfig) where
import XMonad import XMonad
import qualified XMonad.StackSet as W import qualified XMonad.StackSet as W
import XMonad.Actions.CopyWindow
import XMonad.Layouts hiding (Tall) import XMonad.Layouts hiding (Tall)
import XMonad.Layout.Tabbed import XMonad.Layout.Tabbed
import XMonad.Layout.HintedTile import XMonad.Layout.HintedTile
@ -37,8 +38,12 @@ sjanssenConfig = do
where where
tiled = HintedTile 1 0.03 0.5 tiled = HintedTile 1 0.03 0.5
mykeys (XConfig {modMask = modm}) = M.fromList $ mykeys (XConfig {modMask = modm, workspaces = ws}) = M.fromList $
[((modm, xK_p ), shellPrompt myPromptConfig)] [((modm, xK_p ), shellPrompt myPromptConfig)
,((modm .|. shiftMask, xK_c ), kill1)
,((modm .|. shiftMask .|. controlMask, xK_c ), kill)
,((modm .|. shiftMask, xK_0 ), windows $ \w -> foldr copy w ws)
]
myFont = "xft:Bitstream Vera Sans Mono:pixelsize=10" myFont = "xft:Bitstream Vera Sans Mono:pixelsize=10"
myTConf = defaultTConf { fontName = myFont } myTConf = defaultTConf { fontName = myFont }