Adding menu that allows quick changing colorscheme in XMonad.
This commit is contained in:
parent
588fee1986
commit
3440f89019
|
@ -0,0 +1,38 @@
|
||||||
|
#!/usr/bin/env bash
|
||||||
|
#
|
||||||
|
# Script name: dtos-colorscheme
|
||||||
|
# Description: Change colorscheme in DTOS.
|
||||||
|
# Dependencies: dmenu, dmscripts
|
||||||
|
# GitLab: https://www.gitlab.com/dwt1/dtos
|
||||||
|
# License: https://www.gitlab.com/dwt1/dtos/LICENSE
|
||||||
|
# Contributors: Derek Taylor
|
||||||
|
|
||||||
|
# Set with the flags "-e", "-u","-o pipefail" cause the script to fail
|
||||||
|
# if certain things happen, which is a good thing. Otherwise, we can
|
||||||
|
# get hidden bugs that are hard to discover.
|
||||||
|
set -euo pipefail
|
||||||
|
|
||||||
|
# shellcheck disable=SC1091
|
||||||
|
source "$HOME/.config/dmscripts/config"
|
||||||
|
|
||||||
|
options=("DoomOne"
|
||||||
|
"Dracula"
|
||||||
|
"GruvboxDark"
|
||||||
|
"MonokaiPro"
|
||||||
|
"Nord"
|
||||||
|
"OceanicNext"
|
||||||
|
"Palenight"
|
||||||
|
"SolarizedDark"
|
||||||
|
"SolarizedLight"
|
||||||
|
"TomorrowNight")
|
||||||
|
|
||||||
|
choice=$(printf '%s\n' "${options[@]}" | ${DMENU} 'Choose color scheme:' "${@}")
|
||||||
|
|
||||||
|
if [ "$choice" ]; then
|
||||||
|
sed -i "s/import Colors.*/import Colors.$choice/g" "$HOME"/.xmonad/README.org || echo "Cannot modify README.org"
|
||||||
|
sed -i "s/import Colors.*/import Colors.$choice/g" "$HOME"/.xmonad/xmonad.hs || echo "Cannot modify xmonad.hs"
|
||||||
|
xmonad --restart
|
||||||
|
# What to do if we just escape without choosing anything.
|
||||||
|
else
|
||||||
|
echo "Program terminated." && exit 0
|
||||||
|
fi
|
|
@ -489,21 +489,22 @@ myKeys =
|
||||||
-- KB_GROUP Other Dmenu Prompts
|
-- KB_GROUP Other Dmenu Prompts
|
||||||
-- In Xmonad and many tiling window managers, M-p is the default keybinding to
|
-- In Xmonad and many tiling window managers, M-p is the default keybinding to
|
||||||
-- launch dmenu_run, so I've decided to use M-p plus KEY for these dmenu scripts.
|
-- launch dmenu_run, so I've decided to use M-p plus KEY for these dmenu scripts.
|
||||||
, ("M-p h", spawn "dm-hub") -- allows access to all dmscripts
|
, ("M-p h", spawn "dm-hub") -- allows access to all dmscripts
|
||||||
, ("M-p a", spawn "dm-sounds") -- choose an ambient background
|
, ("M-p a", spawn "dm-sounds") -- choose an ambient background
|
||||||
, ("M-p b", spawn "dm-setbg") -- set a background
|
, ("M-p b", spawn "dm-setbg") -- set a background
|
||||||
, ("M-p c", spawn "dm-colpick") -- pick color from our scheme
|
, ("M-p c", spawn "dtos-colorscheme") -- choose a colorscheme
|
||||||
, ("M-p e", spawn "dm-confedit") -- edit config files
|
, ("M-p C", spawn "dm-colpick") -- pick color from our scheme
|
||||||
, ("M-p i", spawn "dm-maim") -- screenshots (images)
|
, ("M-p e", spawn "dm-confedit") -- edit config files
|
||||||
, ("M-p k", spawn "dm-kill") -- kill processes
|
, ("M-p i", spawn "dm-maim") -- screenshots (images)
|
||||||
, ("M-p m", spawn "dm-man") -- manpages
|
, ("M-p k", spawn "dm-kill") -- kill processes
|
||||||
, ("M-p n", spawn "dm-note") -- store one-line notes and copy them
|
, ("M-p m", spawn "dm-man") -- manpages
|
||||||
, ("M-p o", spawn "dm-bookman") -- qutebrowser bookmarks/history
|
, ("M-p n", spawn "dm-note") -- store one-line notes and copy them
|
||||||
, ("M-p p", spawn "passmenu") -- passmenu
|
, ("M-p o", spawn "dm-bookman") -- qutebrowser bookmarks/history
|
||||||
, ("M-p q", spawn "dm-logout") -- logout menu
|
, ("M-p p", spawn "passmenu") -- passmenu
|
||||||
, ("M-p r", spawn "dm-reddit") -- reddio (a reddit viewer)
|
, ("M-p q", spawn "dm-logout") -- logout menu
|
||||||
, ("M-p s", spawn "dm-websearch") -- search various search engines
|
, ("M-p r", spawn "dm-reddit") -- reddio (a reddit viewer)
|
||||||
, ("M-p t", spawn "dm-translate") -- translate text (Google Translate)
|
, ("M-p s", spawn "dm-websearch") -- search various search engines
|
||||||
|
, ("M-p t", spawn "dm-translate") -- translate text (Google Translate)
|
||||||
|
|
||||||
-- KB_GROUP Useful programs to have a keybinding for launch
|
-- KB_GROUP Useful programs to have a keybinding for launch
|
||||||
, ("M-<Return>", spawn (myTerminal))
|
, ("M-<Return>", spawn (myTerminal))
|
||||||
|
|
|
@ -373,21 +373,22 @@ myKeys =
|
||||||
-- KB_GROUP Other Dmenu Prompts
|
-- KB_GROUP Other Dmenu Prompts
|
||||||
-- In Xmonad and many tiling window managers, M-p is the default keybinding to
|
-- In Xmonad and many tiling window managers, M-p is the default keybinding to
|
||||||
-- launch dmenu_run, so I've decided to use M-p plus KEY for these dmenu scripts.
|
-- launch dmenu_run, so I've decided to use M-p plus KEY for these dmenu scripts.
|
||||||
, ("M-p h", spawn "dm-hub") -- allows access to all dmscripts
|
, ("M-p h", spawn "dm-hub") -- allows access to all dmscripts
|
||||||
, ("M-p a", spawn "dm-sounds") -- choose an ambient background
|
, ("M-p a", spawn "dm-sounds") -- choose an ambient background
|
||||||
, ("M-p b", spawn "dm-setbg") -- set a background
|
, ("M-p b", spawn "dm-setbg") -- set a background
|
||||||
, ("M-p c", spawn "dm-colpick") -- pick color from our scheme
|
, ("M-p c", spawn "dtos-colorscheme") -- choose a colorscheme
|
||||||
, ("M-p e", spawn "dm-confedit") -- edit config files
|
, ("M-p C", spawn "dm-colpick") -- pick color from our scheme
|
||||||
, ("M-p i", spawn "dm-maim") -- screenshots (images)
|
, ("M-p e", spawn "dm-confedit") -- edit config files
|
||||||
, ("M-p k", spawn "dm-kill") -- kill processes
|
, ("M-p i", spawn "dm-maim") -- screenshots (images)
|
||||||
, ("M-p m", spawn "dm-man") -- manpages
|
, ("M-p k", spawn "dm-kill") -- kill processes
|
||||||
, ("M-p n", spawn "dm-note") -- store one-line notes and copy them
|
, ("M-p m", spawn "dm-man") -- manpages
|
||||||
, ("M-p o", spawn "dm-bookman") -- qutebrowser bookmarks/history
|
, ("M-p n", spawn "dm-note") -- store one-line notes and copy them
|
||||||
, ("M-p p", spawn "passmenu") -- passmenu
|
, ("M-p o", spawn "dm-bookman") -- qutebrowser bookmarks/history
|
||||||
, ("M-p q", spawn "dm-logout") -- logout menu
|
, ("M-p p", spawn "passmenu") -- passmenu
|
||||||
, ("M-p r", spawn "dm-reddit") -- reddio (a reddit viewer)
|
, ("M-p q", spawn "dm-logout") -- logout menu
|
||||||
, ("M-p s", spawn "dm-websearch") -- search various search engines
|
, ("M-p r", spawn "dm-reddit") -- reddio (a reddit viewer)
|
||||||
, ("M-p t", spawn "dm-translate") -- translate text (Google Translate)
|
, ("M-p s", spawn "dm-websearch") -- search various search engines
|
||||||
|
, ("M-p t", spawn "dm-translate") -- translate text (Google Translate)
|
||||||
|
|
||||||
-- KB_GROUP Useful programs to have a keybinding for launch
|
-- KB_GROUP Useful programs to have a keybinding for launch
|
||||||
, ("M-<Return>", spawn (myTerminal))
|
, ("M-<Return>", spawn (myTerminal))
|
||||||
|
|
Loading…
Reference in New Issue