diff --git a/.xmonad/xmonad.hs b/.xmonad/xmonad.hs
index 05d56b6..624b6ed 100644
--- a/.xmonad/xmonad.hs
+++ b/.xmonad/xmonad.hs
@@ -147,11 +147,14 @@ myKeys conf@(XConfig {XMonad.modMask = modm}) = M.fromList $
     , ((modm,               xK_o     ), spawn "dmenu_run")
 
     -- prompt computer shutdown
-    , ((modm .|. shiftMask, xK_s     ), spawn "/home/solomon/.scripts/prompt \"Are you sure you want to Shutdown?\" \"shutdown -h now\"")
+    , ((modm .|. shiftMask, xK_s     ), spawn "/home/solomon/.scripts/prompt \"Are you sure you want to Shutdown?\" \"shutdown now\"")
 
     -- prompt computer reboot
     , ((modm .|. shiftMask, xK_r     ), spawn "/home/solomon/.scripts/prompt \"Are you sure you want to Restart?\" \"reboot\"")
 
+    -- prompt computer lock
+    , ((modm .|. shiftMask, xK_l     ), spawn "/home/solomon/.scripts/prompt \"Are you sure you want to lock?\" \"slock\"")
+
     -- launch rofi ssh
     , ((modm .|. shiftMask, xK_a     ), spawn "rofi -show ssh")