From 6948e4c932c9772ab7f3237e47c3ecd55ea85ad5 Mon Sep 17 00:00:00 2001
From: Thanos Apollo <public@thanosapollo.com>
Date: Wed, 23 Aug 2023 07:53:09 +0300
Subject: stumwpm: update modeline shell-commands

---
 stumpwm.org | 10 ++++++----
 1 file changed, 6 insertions(+), 4 deletions(-)

(limited to 'stumpwm.org')

diff --git a/stumpwm.org b/stumpwm.org
index ed15a9f..32df483 100644
--- a/stumpwm.org
+++ b/stumpwm.org
@@ -57,10 +57,10 @@
 	(is-hermes (feh-set-wallpaper "library-old-house.jpg")))
 
   (when *initializing*
-    (run-shell-command
+    (stumpwm:run-shell-command
       "emacs --daemon &
        picom &
-       setxkbmap -layout us,gr,my-bg -option 'ctrl:swapcaps' -option 'grp:alt_space_toggle"))
+       setxkbmap -layout us,gr,my-bg -option 'ctrl:swapcaps' -option 'grp:alt_space_toggle'"))
 
   (setf *startup-message* "Welcome back, Thanos")
 #+end_src
@@ -255,7 +255,7 @@
 	      "% | CPU:"
 	      '(:eval (string-trim '(#\Newline)
 		       (stumpwm:run-shell-command
-			"grep 'cpu ' /proc/stat | awk '{usage=($2+$4)*100/($2+$4+$5)} END {printf \"%.2f%\n\", usage}'"t)))
+			"grep 'cpu ' /proc/stat | awk '{usage=($2+$4)*100/($2+$4+$5)} END {printf(\"%.2f\", usage)}'" t)))
 	      "% | VOL:"
 	      '(:eval (string-trim '(#\Newline)
 		       (stumpwm:run-shell-command "pamixer --get-volume" t)))
@@ -264,7 +264,9 @@
 	      (when is-hermes
 		"BAT:%B |")
 	      "%d"))
-  (mode-line)
+
+  (when stumpwm:*initializing*
+    (mode-line))
 #+end_src
 /Note: to trim new line when using shell commands for mode-line use something like this:/
 #+begin_src emacs-lisp :tangle nil
-- 
cgit v1.2.3