Editing xmonad keybindings and sxiv handler.

.config/sxiv/exec/key-handler

@@ -50,10 +50,6 @@ do
             notify-send "File information" \
             "$(mediainfo "$file" | tr -s ' ' | grep -v CompleteName_Last)"
         ;;
-        "w") 
-            feh --bg-scale "$file" &&
-            notify-send "$file has been set as your wallpaper." && exit 0
-        ;;
         "x") 
             xwallpaper --stretch "$file" &&
             filename=$HOME/.xwallpaper

.xmonad/README.org

@@ -155,14 +155,13 @@ myStartupHook = do
     spawnOnce "conky -c $HOME/.config/conky/xmonad.conkyrc"
     spawnOnce "trayer --edge top --align right --widthtype request --padding 6 --SetDockType true --SetPartialStrut true --expand true --monitor 1 --transparent true --alpha 0 --tint 0x282c34  --height 22 &"
     spawnOnce "/usr/bin/emacs --daemon &" -- emacs daemon for the emacsclient
-    -- spawnOnce "kak -d -s mysession &"  -- kakoune daemon for better performance
+    -- uncomment to restore last saved wallpaper
-    -- spawnOnce "urxvtd -q -o -f &"      -- urxvt daemon for better performance
+    spawnOnce "xargs xwallpaper --stretch < ~/.xwallpaper"
+    --uncomment to set a random wallpaper on login
+    -- spawnOnce "find /usr/share/backgrounds/dtos-backgrounds/ -type f | shuf -n 1 | xargs xwallpaper --stretch"
 #+END_SRC
 
-Uncomment only ONE of the following options for setting wallpaper.
 #+BEGIN_SRC haskell
-    spawnOnce "xargs xwallpaper --stretch < ~/.xwallpaper"  -- set last saved with xwallpaper
-    -- spawnOnce "find ~/wallpapers/ -type f | shuf -n 1 | xargs xwallpaper --stretch"  -- set random xwallpaper
     -- spawnOnce "~/.fehbg &"  -- set last saved feh wallpaper
     -- spawnOnce "feh --randomize --bg-fill ~/wallpapers/*"  -- feh set random wallpaper
     -- spawnOnce "nitrogen --restore &"   -- if you prefer nitrogen to feh
@@ -170,7 +169,7 @@ Uncomment only ONE of the following options for setting wallpaper.
 #+END_SRC
 
 * Gridselect
-GridSelect displays items (programs, open windows, etc.) in a 2D grid and lets the user select from it with the cursor/hjkl keys or the mouse.
+GridSelect displays items (programs, open windows, etc.) in a 2D grid and lets the user selectfrom it with the cursor/hjkl keys or the mouse.
 
 #+BEGIN_SRC haskell
 myColorizer :: Window -> Bool -> X (String, String)
@@ -558,11 +557,11 @@ myKeys =
         , ("C-s c", namedScratchpadAction myScratchPads "calculator")
 
     -- KB_GROUP Set wallpaper
-    -- Set wallpaper with 'feh'. Type 'SUPER+F1' to launch sxiv in the wallpapers directory.
+    -- Set wallpaper with either 'xwallwaper'. Type 'SUPER+F1' to launch sxiv in the
-    -- Then in sxiv, type 'C-x w' to set the wallpaper that you choose.
+    -- wallpapers directory; then in sxiv, type 'C-x x' to set the wallpaper that you
-        , ("M-<F1>", spawn "sxiv -r -q -t -o ~/wallpapers/*")
+    -- choose.  Or, type 'SUPER+F2' to set a random wallpaper.
-        , ("M-<F2>", spawn "find ~/wallpapers/ -type f | shuf -n 1 | xargs xwallpaper --stretch")
+        , ("M-<F1>", spawn "sxiv -r -q -t -o /usr/share/backgrounds/dtos-backgrounds/*")
-        -- , ("M-<F2>", spawn "feh --randomize --bg-fill ~/wallpapers/*")
+        , ("M-<F2>", spawn "find /usr/share/backgrounds/dtos-backgrounds// -type f | shuf -n 1 | xargs xwallpaper --stretch")
 
     -- KB_GROUP Controls for mocp music player (SUPER-u followed by a key)
         , ("M-u p", spawn "mocp --play")

.xmonad/xmonad.hs

@@ -106,11 +106,11 @@ myStartupHook = do
     spawnOnce "conky -c $HOME/.config/conky/xmonad.conkyrc"
     spawnOnce "trayer --edge top --align right --widthtype request --padding 6 --SetDockType true --SetPartialStrut true --expand true --monitor 1 --transparent true --alpha 0 --tint 0x282c34  --height 22 &"
     spawnOnce "/usr/bin/emacs --daemon &" -- emacs daemon for the emacsclient
-    -- spawnOnce "kak -d -s mysession &"  -- kakoune daemon for better performance
+    -- uncomment to restore last saved wallpaper
-    -- spawnOnce "urxvtd -q -o -f &"      -- urxvt daemon for better performance
+    spawnOnce "xargs xwallpaper --stretch < ~/.xwallpaper"
+    --uncomment to set a random wallpaper on login
+    -- spawnOnce "find /usr/share/backgrounds/dtos-backgrounds/ -type f | shuf -n 1 | xargs xwallpaper --stretch"
 
-    spawnOnce "xargs xwallpaper --stretch < ~/.xwallpaper"  -- set last saved with xwallpaper
-    -- spawnOnce "find ~/wallpapers/ -type f | shuf -n 1 | xargs xwallpaper --stretch"  -- set random xwallpaper
     -- spawnOnce "~/.fehbg &"  -- set last saved feh wallpaper
     -- spawnOnce "feh --randomize --bg-fill ~/wallpapers/*"  -- feh set random wallpaper
     -- spawnOnce "nitrogen --restore &"   -- if you prefer nitrogen to feh
@@ -448,11 +448,11 @@ myKeys =
         , ("C-s c", namedScratchpadAction myScratchPads "calculator")
 
     -- KB_GROUP Set wallpaper
-    -- Set wallpaper with 'feh'. Type 'SUPER+F1' to launch sxiv in the wallpapers directory.
+    -- Set wallpaper with either 'xwallwaper'. Type 'SUPER+F1' to launch sxiv in the
-    -- Then in sxiv, type 'C-x w' to set the wallpaper that you choose.
+    -- wallpapers directory; then in sxiv, type 'C-x x' to set the wallpaper that you
-        , ("M-<F1>", spawn "sxiv -r -q -t -o ~/wallpapers/*")
+    -- choose.  Or, type 'SUPER+F2' to set a random wallpaper.
-        , ("M-<F2>", spawn "find ~/wallpapers/ -type f | shuf -n 1 | xargs xwallpaper --stretch")
+        , ("M-<F1>", spawn "sxiv -r -q -t -o /usr/share/backgrounds/dtos-backgrounds/*")
-        -- , ("M-<F2>", spawn "feh --randomize --bg-fill ~/wallpapers/*")
+        , ("M-<F2>", spawn "find /usr/share/backgrounds/dtos-backgrounds// -type f | shuf -n 1 | xargs xwallpaper --stretch")
 
     -- KB_GROUP Controls for mocp music player (SUPER-u followed by a key)
         , ("M-u p", spawn "mocp --play")