aboutsummaryrefslogtreecommitdiffstats
path: root/XMonad/Util/Loggers.hs
diff options
context:
space:
mode:
authorJan Vornberger <jan.vornberger@informatik.uni-oldenburg.de>2009-10-24 22:45:13 +0200
committerJan Vornberger <jan.vornberger@informatik.uni-oldenburg.de>2009-10-24 22:45:13 +0200
commitc2926c7f7543f3e79d6ecd841c0c55ea2454606a (patch)
tree61e42d93a119665346bed99cebaf90fb647ad767 /XMonad/Util/Loggers.hs
parentb2ac5a5056061a76bee34321dee0a9e109857f5e (diff)
downloadXMonadContrib-c2926c7f7543f3e79d6ecd841c0c55ea2454606a.tar.gz
XMonadContrib-c2926c7f7543f3e79d6ecd841c0c55ea2454606a.tar.xz
XMonadContrib-c2926c7f7543f3e79d6ecd841c0c55ea2454606a.zip
Added the alignment option 'AlignRightOffset'
Ignore-this: 58cc00e1be669877e38a97e36b924969 darcs-hash:20091024204513-594c5-0156243473792c90824835f7fc0cbc8b5078336c.gz
Diffstat (limited to '')
-rw-r--r--XMonad/Util/Loggers.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/XMonad/Util/Loggers.hs b/XMonad/Util/Loggers.hs
index f8aef65..3065d30 100644
--- a/XMonad/Util/Loggers.hs
+++ b/XMonad/Util/Loggers.hs
@@ -254,7 +254,7 @@ fixedWidthL a str n logger = do
case a of
AlignCenter -> toL (take n $ padhalf l ++ l ++ cs)
AlignRight -> toL (reverse (take n $ reverse l ++ cs))
- AlignLeft -> toL (take n $ l ++ cs)
+ _ -> toL (take n $ l ++ cs)
where
toL = return . Just
cs = cycle str