feat: add dmenu screenshot script

roles/scripts/files/dmenu_screenshot

@@ -0,0 +1,14 @@
+#! /usr/bin/env sh
+# Changed a bit from Luke Smith https://github.com/LukeSmithxyz/voidrice/blob/master/.local/bin/maimpick
+# A dmenu for selecting a screenshot option as listed below. Requires maim, xdotool and dmenu.
+
+DEST="/home/max/bilder/screenshots/screenshot_$(date +%Y-%m-%d_%T).png"
+
+case "$(printf "a selected area\\ncurrent window\\nfull screen\\na selected area (to clipboard)\\ncurrent window (to clipboard)\\nfull screen (to clipboard)" | dmenu -i -p "Screenshot which area?")" in
+	"a selected area") maim -u -s $DEST ;;
+	"current window") maim -u -i "$(xdotool getactivewindow)" $DEST ;;
+	"full screen") maim -u -B -d '0.8' --quiet $DEST ;;
+	"a selected area (to clipboard)") maim -s -u | xclip -selection clipboard -t image/png ;;
+	"current window (to clipboard)") maim -u -i "$(xdotool getactivewindow)" | xclip -selection clipboard -t image/png ;;
+	"full screen (to clipboard)") maim | xclip -selection clipboard -t image/png ;;
+esac

roles/scripts/tasks/main.yml

@@ -5,6 +5,8 @@
       - tectonic
       - pandoc
       - ttf-liberation
+      - maim
+      - xdotool
     state: present
   become: true
   tags: pc
@@ -25,4 +27,5 @@
     - { src: compiledoc, dest: ~/.local/bin/compiledoc }
     - { 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 }
   tags: pc

roles/xmonad/files/xmonad_t460p.hs

@@ -155,10 +155,9 @@ myAdditionalKeys =
     , ("M-.",                       sendMessage ToggleStruts)
 
     -- dmenu prompts
-    , ("M-<Return>",                spawn "dm-recent-aliases")
+    , ("M-<Return>",                spawn "dmenu_run")
-    , ("M-p s",                     spawn "dm-screenshot")
+    , ("M-p s",                     spawn "dmenu_screenshot")
     , ("M-p k",                     spawn "dm-kill")
-    , ("M-p p",                     shellPrompt topicPrompt)
 
     -- scratchpads
     , ("M-n",                       namedScratchpadAction myScratchpads "nnn")
@@ -269,7 +268,7 @@ myStartupHook = do
 main = do
     xmproc0 <- spawnPipe "xmobar -x 0 /home/max/.config/xmobar/xmobarrc"
     xmproc1 <- spawnPipe "xmobar -x 1 /home/max/.config/xmobar/xmobarrc"
-    xmonad $ spawnExternalProcess def $ docks def {
+    xmonad $ ewmh . spawnExternalProcess def $ docks def {
           -- simple stuff
         terminal           = myTerminal,
         borderWidth        = myBorderWidth,