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

SimpleFLoat: change the description to Float (Simple is the decoration description)

Browse Source
This commit is contained in:
Andrea Rossato 2008-01-27 14:45:56 +00:00
parent 14d7231dd0
commit ddbbc56285
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
XMonad/Layout/SimpleFloat.hs
View File

@ -61,7 +61,7 @@ data SimpleFloat a = SF Dimension deriving (Show, Read)
instance LayoutClass SimpleFloat Window where instance LayoutClass SimpleFloat Window where
doLayout (SF i) sc (S.Stack w l r) = do wrs <- mapM (getSize i sc) (w : reverse l ++ r) doLayout (SF i) sc (S.Stack w l r) = do wrs <- mapM (getSize i sc) (w : reverse l ++ r)
return (wrs, Nothing) return (wrs, Nothing)
description _ = "SimpleFloat" description _ = "Float"
getSize :: Dimension -> Rectangle -> Window -> X (Window,Rectangle) getSize :: Dimension -> Rectangle -> Window -> X (Window,Rectangle)
getSize i (Rectangle rx ry _ _) w = do getSize i (Rectangle rx ry _ _) w = do