1 files changed, 15 insertions, 0 deletions
diff --git a/src/Internal/PassMenu.hs b/src/Internal/PassMenu.hs
new file mode 100644
index 0000000..7374bed
--- /dev/null
+++ b/src/Internal/PassMenu.hs
@@ -0,0 +1,15 @@
+module Internal.PassMenu where
+
+import XMonad
+import XMonad.Util.Run
+import Control.Monad
+
+runPassMenu :: X ()
+runPassMenu = void $
+  safeSpawn "passmenu" [
+    "-p", "Password ", 
+    "-l", "12",
+    "-dim", "0.4",
+    "-sb", "#f54245",
+    "-nf", "#f54245" ]
+