aboutsummaryrefslogtreecommitdiff
path: root/src/Internal/DMenu.hs
diff options
context:
space:
mode:
authorJosh Rahm <rahm@google.com>2021-10-29 15:53:16 -0600
committerJosh Rahm <rahm@google.com>2021-10-29 19:53:26 -0600
commit70b1acbce0c873ec9643ccfb59352b73d2521bfb (patch)
tree800d2793f4800a62293deb52f88f9a5da4dc5e16 /src/Internal/DMenu.hs
parent42f81370dfe278a18e61e1a6a8e5caa580be37d7 (diff)
downloadrde-70b1acbce0c873ec9643ccfb59352b73d2521bfb.tar.gz
rde-70b1acbce0c873ec9643ccfb59352b73d2521bfb.tar.bz2
rde-70b1acbce0c873ec9643ccfb59352b73d2521bfb.zip
Change Mod key to hyper & pimp out my DMenu.
Diffstat (limited to 'src/Internal/DMenu.hs')
-rw-r--r--src/Internal/DMenu.hs10
1 files changed, 10 insertions, 0 deletions
diff --git a/src/Internal/DMenu.hs b/src/Internal/DMenu.hs
new file mode 100644
index 0000000..1ece347
--- /dev/null
+++ b/src/Internal/DMenu.hs
@@ -0,0 +1,10 @@
+module Internal.DMenu where
+
+import XMonad
+import XMonad.Util.Run
+import Control.Monad
+
+runDMenu :: X ()
+runDMenu = void $ do
+ safeSpawn "/usr/bin/dmenu_run" [
+ "-p", "Execute ", "-l", "12", "-dim", "0.4"]