summaryrefslogtreecommitdiffstats
path: root/src/XMonad
diff options
context:
space:
mode:
authorMichal Minar <miminar@redhat.com>2015-08-24 08:10:49 +0200
committerMichal Minar <miminar@redhat.com>2015-08-24 08:10:49 +0200
commit5b8ed72611fef81f2018396cd3881080a59df02d (patch)
treed0334fcfd8f6dd55571c9d2ccf0705ba92c7d888 /src/XMonad
parent1b65350fc6ae21f430fe90060bd154fb06fad3c1 (diff)
downloadxminad-5b8ed72611fef81f2018396cd3881080a59df02d.tar.gz
xminad-5b8ed72611fef81f2018396cd3881080a59df02d.tar.xz
xminad-5b8ed72611fef81f2018396cd3881080a59df02d.zip
Added support for GHC 7.10
Signed-off-by: Michal Minar <miminar@redhat.com>
Diffstat (limited to 'src/XMonad')
-rw-r--r--src/XMonad/Local/Keys.hs4
-rw-r--r--src/XMonad/Local/Layout.hs1
2 files changed, 3 insertions, 2 deletions
diff --git a/src/XMonad/Local/Keys.hs b/src/XMonad/Local/Keys.hs
index eedd708..1f63fcb 100644
--- a/src/XMonad/Local/Keys.hs
+++ b/src/XMonad/Local/Keys.hs
@@ -175,10 +175,10 @@ genericKeys conf = [
, ("e", spawn "monitor-hotplug")
, ("s", spawn "mate-session-save --shutdown-dialog")
, ("q", spawn "mate-session-save --logout")
- , ("l", spawn "mate-screensaver-command --lock")
+ , ("l", spawn "mate-screensaver-command --lock" >> spawn "xset dpms force off")
]
])
- , ("C-q", spawn "mate-screensaver-command --lock")
+ , ("C-q", spawn "mate-screensaver-command --lock" >> spawn "xset dpms force off")
-- namedScratchpads
, ("C-S-t", namedScratchpadAction namedScratchpads "htop")
diff --git a/src/XMonad/Local/Layout.hs b/src/XMonad/Local/Layout.hs
index 5d4b880..99aa2b6 100644
--- a/src/XMonad/Local/Layout.hs
+++ b/src/XMonad/Local/Layout.hs
@@ -1,4 +1,5 @@
{-# OPTIONS -fno-warn-missing-signatures #-}
+{-# OPTIONS -XFlexibleContexts #-}
module XMonad.Local.Layout (layoutHook) where