summaryrefslogtreecommitdiff
path: root/stumpwm.org
diff options
context:
space:
mode:
Diffstat (limited to 'stumpwm.org')
-rw-r--r--stumpwm.org18
1 files changed, 8 insertions, 10 deletions
diff --git a/stumpwm.org b/stumpwm.org
index e59392a..f87ab45 100644
--- a/stumpwm.org
+++ b/stumpwm.org
@@ -207,18 +207,16 @@
(setf *group-format* "%t")
(setf *window-format* "%n: %30t")
- (setf *mode-line-background-color* thanos-hope-alt
- ,*mode-line-foreground-color* thanos-hope-fg)
+ ;; set modeline colors and highlight
+ (setf *mode-line-background-color* thanos-hope
+ ,*mode-line-foreground-color* thanos-hope-fg
+ stumpwm:*mode-line-border-color* thanos-hope
+ stumpwm:*mode-line-highlight-template* "«~A»")
+
(setf *mode-line-border-color* thanos-hope1
,*mode-line-border-width* 2)
- (setf mem::*mem-modeline-fmt* "%a%p"
- mpd:*mpd-modeline-fmt* "%a - %t"
- mpd:*mpd-status-fmt* "%a - %t"
- ,*hidden-window-color* "^**"
- ,*mode-line-highlight-template* "«~A»")
-
(when *initializing*
(grename "[EMACS]")
(gnewbg "[BROWSER]")
@@ -249,8 +247,8 @@
;; Check when hermes(laptop) t display battery
(when (equal (get-hostname) "hermes")
"BAT:%B |")
- '(:eval (string-trim '(#\Newline)
- (stumpwm:run-shell-command "exec ~/Developer/scripts/get-weather.sh" t)))
+ ;; '(:eval (string-trim '(#\Newline)
+ ;; (stumpwm:run-shell-command "exec ~/Developer/scripts/get-weather.sh" t)))
" %d"))
#+end_src
/Note: to trim new line when using shell commands for mode-line use something like this:/