feat: add dmenu script for killing processes

roles/scripts/files/dmenu_kill

@@ -0,0 +1,18 @@
+#! /usr/bin/env sh
+# A dmenu for selecting a process to kill
+# adapted from https://gitlab.com/dwt1/dmscripts/-/blob/master/scripts/dm-kill
+
+SELECTION="$(ps --user "$USER" -F | awk '(NR>1)''{print $2" "$11}' | dmenu -i -p "Search for process to kill:")"
+
+if [ -z "$SELECTION" ]; then
+	exit 0
+else
+	ANSWER="$(printf "No\nYes" | dmenu -i -p "Kill $SELECTED?")"
+
+	if [ "$ANSWER" = "Yes" ]; then
+		kill -9 "${SELECTION%% *}"
+		exit 0
+	else
+		exit 1
+	fi
+fi

roles/scripts/tasks/main.yml

@@ -28,5 +28,6 @@
     - { src: inline_code.tex, dest: ~/.local/bin/inline_code.tex }
     - { src: open_editor_in_new_shell, dest: ~/.local/bin/open_editor_in_new_shell }
     - { src: dmenu_screenshot, dest: ~/.local/bin/dmenu_screenshot }
+    - { src: dmenu_kill, dest: ~/.local/bin/dmenu_kill }
     - { src: run_in_bash, dest: ~/.local/bin/run_in_bash }
   tags: pc

roles/xmonad/files/xmonad_qwerty.hs

@@ -158,7 +158,7 @@ myAdditionalKeys =
     -- dmenu prompts
     , ("M-<Return>",                spawn "dmenu_run")
     , ("M-p s",                     spawn "dmenu_screenshot")
-    , ("M-p k",                     spawn "dm-kill")
+    , ("M-p k",                     spawn "dmenu_kill")
 
     -- scratchpads
     , ("M-s c",                     namedScratchpadAction myScratchpads "cmus")

roles/xmonad/files/xmonad_t460p.hs

@@ -174,7 +174,7 @@ myAdditionalKeys =
     -- dmenu prompts
     , ("M-<Return>",                spawn "dmenu_run")
     , ("M-p s",                     spawn "dmenu_screenshot")
-    , ("M-p k",                     spawn "dm-kill")
+    , ("M-p k",                     spawn "dmenu_kill")
 
     -- scratchpads
     , ("M-n",                       namedScratchpadAction myScratchpads "nnn")