diff --git a/modules/wm/xmonad/config.hs b/modules/wm/xmonad/config.hs
index 9f77278..815f302 100644
--- a/modules/wm/xmonad/config.hs
+++ b/modules/wm/xmonad/config.hs
@@ -46,7 +46,10 @@ myConfig = ewmhFullscreen $ ewmh $ Docks.docks $ def
   , ("M-S-q", restart "xmonad" True)
   , ("M-C-s", unGrab *> spawn "scrot -s")
   , ("M-b", sendMessage Docks.ToggleStruts)
+  , ("M-p", spawn appLauncher)
   ]
+  where
+    appLauncher = "rofi -show combi -modes combi -combi-modes window,drun,run,ssh"
 
 
 -- myManageHook :: ManageHook