diff options
author | Spencer Janssen <sjanssen@cse.unl.edu> | 2007-09-28 00:27:30 +0200 |
---|---|---|
committer | Spencer Janssen <sjanssen@cse.unl.edu> | 2007-09-28 00:27:30 +0200 |
commit | 5f9c4b3bfc270545b9e1a694afe28ecc5561f230 (patch) | |
tree | 20579bad44d816cbbad70cfbc3dc0ba9a5c355c5 | |
parent | db5d37f508cd710b48c2224d9c02d02388f1000e (diff) | |
download | xmonad-5f9c4b3bfc270545b9e1a694afe28ecc5561f230.tar.gz xmonad-5f9c4b3bfc270545b9e1a694afe28ecc5561f230.tar.xz xmonad-5f9c4b3bfc270545b9e1a694afe28ecc5561f230.zip |
Update kind changes in the -class branch
darcs-hash:20070927222730-a5988-ffed7a66f2fbb4cb244123718c803f4fe4df074b.gz
Diffstat (limited to '')
-rw-r--r-- | StackSet.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/StackSet.hs b/StackSet.hs index 23b9936..b1b156a 100644 --- a/StackSet.hs +++ b/StackSet.hs @@ -495,7 +495,7 @@ swapMaster = modify' $ \c -> case c of -- natural! keep focus, move current to the top, move top to current. -- | /O(s)/. Set focus to the master window. -focusMaster :: StackSet i a s sd -> StackSet i a s sd +focusMaster :: StackSet i l a s sd -> StackSet i l a s sd focusMaster = modify' $ \c -> case c of Stack _ [] _ -> c Stack t ls rs -> Stack x [] (xs ++ t : rs) where (x:xs) = reverse ls |