diff options
| author | Spencer Janssen <sjanssen@cse.unl.edu> | 2007-11-09 03:47:22 +0100 |
|---|---|---|
| committer | Spencer Janssen <sjanssen@cse.unl.edu> | 2007-11-09 03:47:22 +0100 |
| commit | 35b193f98ed16da44b34e9e1827ee0e8cea7f802 (patch) | |
| tree | 1e74edcbb5091b1ae0c0d41ff092d0de2ad2f849 /XMonad/Core.hs | |
| parent | cd045042f71ee5fc532ba79bd4b2a0417eb3677e (diff) | |
| download | metatile-35b193f98ed16da44b34e9e1827ee0e8cea7f802.tar metatile-35b193f98ed16da44b34e9e1827ee0e8cea7f802.zip | |
New ManageHook system
darcs-hash:20071109024722-a5988-c499d006a8a4a48dd7c8cbaf4e4ea9635ceb1ec4
Diffstat (limited to 'XMonad/Core.hs')
| -rw-r--r-- | XMonad/Core.hs | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/XMonad/Core.hs b/XMonad/Core.hs index 3f96592..56700c0 100644 --- a/XMonad/Core.hs +++ b/XMonad/Core.hs @@ -67,7 +67,7 @@ data XConfig = XConfig , focusedBorderColor :: !String , terminal :: !String , layoutHook :: !(Layout Window) - , manageHook :: Window -> String -> String -> String -> X (WindowSet -> WindowSet) + , manageHook :: Window -> X (WindowSet -> WindowSet) , workspaces :: [String] , defaultGaps :: [(Int,Int,Int,Int)] , numlockMask :: !KeyMask @@ -78,6 +78,7 @@ data XConfig = XConfig , logHook :: X () } + type WindowSet = StackSet WorkspaceId (Layout Window) Window ScreenId ScreenDetail type WindowSpace = Workspace WorkspaceId (Layout Window) Window |