diff options
| author | Adam Vogt <vogt.adam@gmail.com> | 2011-07-15 01:17:41 +0200 |
|---|---|---|
| committer | Adam Vogt <vogt.adam@gmail.com> | 2011-07-15 01:17:41 +0200 |
| commit | 3eae9324c087da3fae57f2dcd9181eb850f12c1a (patch) | |
| tree | 912ddce82c8e912679e4005b791032849928a383 /XMonad | |
| parent | 675e2b70b16fdc4151bc2ec8b8953804bdd428b6 (diff) | |
| download | XMonadContrib-3eae9324c087da3fae57f2dcd9181eb850f12c1a.tar.gz XMonadContrib-3eae9324c087da3fae57f2dcd9181eb850f12c1a.tar.xz XMonadContrib-3eae9324c087da3fae57f2dcd9181eb850f12c1a.zip | |
Correct H.DynamicLog.dynamicLogXinerama comment. Wuzzeb's patch at issue 466.
Ignore-this: 8434fe4c740fc06b5b17f016e28e0376
Slight changes to the patch to 1. work with haddock, and 2. remove ppOutput
which distracts from the formatting and is covered elsewhere.
darcs-hash:20110714231741-1499c-35d5783d634799a926db2718a0a0cc7b6132a79c.gz
Diffstat (limited to 'XMonad')
| -rw-r--r-- | XMonad/Hooks/DynamicLog.hs | 13 |
1 files changed, 9 insertions, 4 deletions
diff --git a/XMonad/Hooks/DynamicLog.hs b/XMonad/Hooks/DynamicLog.hs index 6081135..0547c80 100644 --- a/XMonad/Hooks/DynamicLog.hs +++ b/XMonad/Hooks/DynamicLog.hs @@ -307,10 +307,15 @@ pprWindowSet sort' urgents pp s = sepBy (ppWsSep pp) . map fmt . sort' $ -- where 1, 9, and 3 are the workspaces on screens 1, 2 and 3, respectively, -- and 2 and 7 are non-visible, non-empty workspaces. -- --- Unfortunately, at the present time, the current layout and window title --- are not shown, and there is no way to incorporate the xinerama --- workspace format shown above with 'dynamicLogWithPP'. Hopefully this --- will change soon. +-- At the present time, the current layout and window title +-- are not shown. The xinerama workspace format shown above can be (mostly) replicated +-- using 'dynamicLogWithPP' by setting 'ppSort' to /getSortByXineramaRule/ from +-- "XMonad.Util.WorkspaceCompare". For example, +-- +-- > defaultPP { ppCurrent = dzenColor "red" "#efebe7" +-- > , ppVisible = wrap "[" "]" +-- > , ppSort = getSortByXineramaRule +-- > } dynamicLogXinerama :: X () dynamicLogXinerama = withWindowSet $ io . putStrLn . pprWindowSetXinerama |