Add ffs (form feed slides) mode for GNU Emacs

[~bandali/configs] / .local / bin / change-theme

diff --git a/.local/bin/change-theme b/.local/bin/change-theme
index 5d997cd..7b20bde 100755 (executable)
--- a/.local/bin/change-theme
+++ b/.local/bin/change-theme
@@ -20,7 +20,9 @@ printf "*.foreground: $fg\n*.background: $bg" | xrdb -override
 printf "*VT100*foreground: $fg\n*VT100*background: $bg" | xrdb -override
 
 # emacs
 printf "*VT100*foreground: $fg\n*VT100*background: $bg" | xrdb -override
 
 # emacs

-emacsclient -ue "(set-face-attribute 'default nil :foreground \"$fg\" :background \"$bg\")"
+if [ "$(pgrep -u $USER emacs)" ]; then
+    emacsclient -ue "(set-face-attribute 'default nil :foreground \"$fg\" :background \"$bg\")"
+fi

 # terminals
 for term in /dev/pts/*; do
     if [ -w "$term" ]; then
 # terminals
 for term in /dev/pts/*; do
     if [ -w "$term" ]; then