* .emacs.d/init.el: Use "Sahel WOL" for Persian text.
[~bandali/configs] / .local / bin / change-theme
index 5d997cd..7b20bde 100755 (executable)
@@ -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