aboutsummaryrefslogtreecommitdiff
path: root/src/Rahm/Desktop/Keys.hs
diff options
context:
space:
mode:
authorJosh Rahm <joshuarahm@gmail.com>2022-04-12 01:54:43 -0600
committerJosh Rahm <joshuarahm@gmail.com>2022-04-12 01:54:43 -0600
commit96643003bd14195f4868712789cd056e9d3581ae (patch)
tree944c009c855dfa30e033636e4684c522089fe7f1 /src/Rahm/Desktop/Keys.hs
parent1fbaaa7ce69ed6320693c389bf670fd3cf20cdd1 (diff)
downloadrde-96643003bd14195f4868712789cd056e9d3581ae.tar.gz
rde-96643003bd14195f4868712789cd056e9d3581ae.tar.bz2
rde-96643003bd14195f4868712789cd056e9d3581ae.zip
Add another layout modifier to add a hole.
This is mostly an academic exercise, as there's probably not much reason to put a hole in the layout, but I must admit that sometimes is aesthetically pleasing to see a little more desktop wallpaper in some cases.
Diffstat (limited to 'src/Rahm/Desktop/Keys.hs')
-rw-r--r--src/Rahm/Desktop/Keys.hs7
1 files changed, 7 insertions, 0 deletions
diff --git a/src/Rahm/Desktop/Keys.hs b/src/Rahm/Desktop/Keys.hs
index e780fbf..0ff8da3 100644
--- a/src/Rahm/Desktop/Keys.hs
+++ b/src/Rahm/Desktop/Keys.hs
@@ -54,6 +54,7 @@ import Rahm.Desktop.PassMenu
import Rahm.Desktop.Logger
import Rahm.Desktop.RebindKeys
import Rahm.Desktop.Swallow
+import Rahm.Desktop.Layout.Hole (toggleHole)
import Rahm.Desktop.Layout.Pop (PopMessage(..))
import Rahm.Desktop.Layout.Flip (flipHorizontally, flipVertically)
import Rahm.Desktop.Layout.Rotate (rotateLayout)
@@ -188,6 +189,12 @@ keymap = runKeys $ do
doc "Print this documentation." $
logs (documentation (keymap config))
+ bind xK_F8 $
+
+ justMod $
+ doc "Print this documentation." $
+ sendMessage toggleHole
+
bind xK_F10 $ do
justMod playPauseDoc