2 files changed, 7 insertions(+), 1 deletions(-)

M home/modules/ruther/home/dwl/config.h
M home/modules/ruther/home/dwl/wm.scm

@@ 152,6 152,7 @@ static const enum libinput_config_tap_button_map button_map = LIBINPUT_CONFIG_TA
 static const char *termcmd[] = { "foot", NULL };
 static const char *runcmd[] = { "foot", "--app-id", "foot-run", NULL };
 static const char *menucmd[] = { "mew-run", NULL };
+static const char *lockcmd[] = { "swaylock", "-fF", NULL };
 
 /* named scratchpads - First arg only serves to match against key in rules*/
 static const char *scratchpadcmd_spotify[] = {


@@ 190,6 191,7 @@ static const Key keys[] = {
 	{ MODKEY,                    Key_Return,     zoom,           {0} },
 	{ MODKEY,                    Key_Tab,        view,           {0} },
 	{ MODKEY|WLR_MODIFIER_SHIFT, Key_c,          killclient,     {0} },
+	{ MODKEY|WLR_MODIFIER_SHIFT, Key_n,          spawn,          {.v = lockcmd} },
 
 	{ MODKEY,                    Key_t,          setlayout,      {.v = &layouts[0]} },
 	{ MODKEY|WLR_MODIFIER_SHIFT, Key_t,          setlayout,      {.v = &layouts[3]} },

@@ 120,7 120,10 @@
                (url "https://git.ditigal.xyz/~ruther/dwl")
                (commit "a8e46f319f574876ce697a7097eb47a2080b1a87")))
          (sha256
-          (base32 "1jkyqwnc6x48bcjcyn1ha69vwql18ib1w47jx6bxz7wg7bvidm01"))))
+          (base32 "1jkyqwnc6x48bcjcyn1ha69vwql18ib1w47jx6bxz7wg7bvidm01"))
+         (patches
+          (list
+           (local-file "dwl-x11-popup.patch")))))
       (arguments (substitute-keyword-arguments (package-arguments base)
                    ((#:phases original-phases)
                     #~(modify-phases #$original-phases


@@ 137,6 140,7 @@
                               (("\"passmenu-totp\"") (string-append "\"" #$password-store-passmenus "/bin/passmenu-totp\""))
                               (("\"passmenu-multi\"") (string-append "\"" #$password-store-passmenus "/bin/passmenu-multi\""))
                               (("\"emacsclient\"") (string-append "\"" #$(emacs-for-wayland) "/bin/emacsclient\""))
+                              (("\"swaylock\"") (string-append "\"" #$swaylock "/bin/swaylock\""))
                               (("%brightness%") #$brightness-script)
                               (("%printscreen%") #$printscreen-script)))))))))))