* .emacs.d/init.el: Use "Sahel WOL" for Persian text.

[~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
-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