diff options
author | Tomas Janousek <tomi@nomi.cz> | 2009-12-11 13:42:18 +0100 |
---|---|---|
committer | Tomas Janousek <tomi@nomi.cz> | 2009-12-11 13:42:18 +0100 |
commit | 2d1e541bc8e3210049a37aa885a9fccbff940daa (patch) | |
tree | 80f23c8425c8cd119eae561e134fd78751e4e7aa | |
parent | 5501cfcbf77e4b23aca8e8338224d3e64dbed589 (diff) | |
download | XMonadContrib-2d1e541bc8e3210049a37aa885a9fccbff940daa.tar.gz XMonadContrib-2d1e541bc8e3210049a37aa885a9fccbff940daa.tar.xz XMonadContrib-2d1e541bc8e3210049a37aa885a9fccbff940daa.zip |
X.L.MouseResizableTile: change description for mirrored variant
Ignore-this: dbc02fb777e35cdc15fb11979c1e983e
The description for mirrored MouseResizableTile is now "Mirror
MouseResizableTile", to follow the standard of other layouts that can be
mirrored using the Mirror modifier.
darcs-hash:20091211124218-c9ff5-5f94a9f2514aaa75a6783e99ac78427f4c09dc6c.gz
-rw-r--r-- | XMonad/Layout/MouseResizableTile.hs | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/XMonad/Layout/MouseResizableTile.hs b/XMonad/Layout/MouseResizableTile.hs index 8c0b7f8..3a3381f 100644 --- a/XMonad/Layout/MouseResizableTile.hs +++ b/XMonad/Layout/MouseResizableTile.hs @@ -144,7 +144,8 @@ instance LayoutClass MouseResizableTile a where where releaseResources = mapM_ deleteDragger $ draggers state handleMessage _ _ = return Nothing - description _ = "MouseResizableTile" + description state = mirror "MouseResizableTile" + where mirror = if isMirrored state then ("Mirror " ++) else id adjustForMirror :: Bool -> DraggerWithRect -> DraggerWithRect adjustForMirror False dragger = dragger |