twin/xmonad
1
0
Fork 0
mirror of https://github.com/xmonad/xmonad.git synced 2025-07-31 20:21:52 -07:00
Code Issues Packages Projects Releases Wiki Activity

LayoutSelection: describe the active layout only

Browse Source
This commit is contained in:
Spencer Janssen
2007-09-28 05:18:58 +00:00
parent a7c4c38ba8
commit 3b64981c78
1 changed files with 3 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
Operations.hs
View File

@@ -386,6 +386,9 @@ instance ReadableSomeLayout a => Layout LayoutSelection a where
return $ (\l' -> LayoutSelection (l':ls)) `fmap` ml' return $ (\l' -> LayoutSelection (l':ls)) `fmap` ml'
-- Unless there is no layout... -- Unless there is no layout...
handleMessage (LayoutSelection []) _ = return Nothing handleMessage (LayoutSelection []) _ = return Nothing
description (LayoutSelection (x:_)) = description x
description _ = "default"
-- --
-- Builtin layout algorithms: -- Builtin layout algorithms:
-- --