twin/xmonad
1
0
Fork 0
mirror of https://github.com/xmonad/xmonad.git synced 2025-08-29 18:13:48 -07:00
Code Issues Packages Projects Releases Wiki Activity

Comment only.

Browse Source
This commit is contained in:
Spencer Janssen
2007-04-02 07:24:18 +00:00
parent 93be71bb88
commit 4a912c8613
1 changed files with 5 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
Operations.hs
View File

@@ -41,6 +41,11 @@ refresh = do
whenJust (W.peekStack n ws) (io . raiseWindow d) whenJust (W.peekStack n ws) (io . raiseWindow d)
whenJust (W.peek ws) setFocus whenJust (W.peek ws) setFocus
-- | tile. Compute the positions for windows in horizontal layout
-- mode.
--
-- TODO generalize this to vertical layout
--
tile :: Rational -> Rectangle -> [Window] -> [(Window, Rectangle)] tile :: Rational -> Rectangle -> [Window] -> [(Window, Rectangle)]
tile _ _ [] = [] tile _ _ [] = []
tile _ d [w] = [(w, d)] tile _ d [w] = [(w, d)]