mirror of
https://github.com/xmonad/xmonad-contrib.git
synced 2025-05-19 11:30:22 -07:00
XPropManage: haddock fixes
This commit is contained in:
parent
a488b7a54f
commit
e630b47bc2
@ -27,15 +27,17 @@ import XMonad
|
|||||||
import XMonad.ManageHook ((-->))
|
import XMonad.ManageHook ((-->))
|
||||||
|
|
||||||
-- $usage
|
-- $usage
|
||||||
--
|
-- You can use this module with the following in your @~\/.xmonad\/xmonad.hs@:
|
||||||
-- Add something like the following lines to Config.hs to use this module
|
|
||||||
--
|
--
|
||||||
-- > import XMonad.Hooks.XPropManage
|
-- > import XMonad.Hooks.XPropManage
|
||||||
--
|
-- > import qualified XMonad.StackSet as W
|
||||||
|
-- > import XMonad.Actions.TagWindows
|
||||||
|
-- > import Data.List
|
||||||
|
--
|
||||||
-- > manageHook = xPropManageHook xPropMatches
|
-- > manageHook = xPropManageHook xPropMatches
|
||||||
-- >
|
-- >
|
||||||
-- > xPropMatches :: [XPropMatch]
|
-- > xPropMatches :: [XPropMatch]
|
||||||
-- > xPropMatches = [ ([ (wM_CLASS, any ("gimp"==)))], (\w -> float w >> return (W.shift "2")))
|
-- > xPropMatches = [ ([ (wM_CLASS, any ("gimp"==))], (\w -> float w >> return (W.shift "2")))
|
||||||
-- > , ([ (wM_COMMAND, any ("screen" ==)), (wM_CLASS, any ("xterm" ==))], pmX (addTag "screen"))
|
-- > , ([ (wM_COMMAND, any ("screen" ==)), (wM_CLASS, any ("xterm" ==))], pmX (addTag "screen"))
|
||||||
-- > , ([ (wM_NAME, any ("Iceweasel" `isInfixOf`))], pmP (W.shift "3"))
|
-- > , ([ (wM_NAME, any ("Iceweasel" `isInfixOf`))], pmP (W.shift "3"))
|
||||||
-- > ]
|
-- > ]
|
||||||
|
Loading…
x
Reference in New Issue
Block a user