From e65583e420e55058895e7e8cff7aa214d8bb4318 Mon Sep 17 00:00:00 2001 From: Tom Willemsen Date: Fri, 31 Aug 2012 09:52:35 +0200 Subject: stumpwm/stumpwmrc.lisp --- stumpwm/stumpwmrc.lisp | 8 +++++--- 1 file changed, 5 insertions(+), 3 deletions(-) diff --git a/stumpwm/stumpwmrc.lisp b/stumpwm/stumpwmrc.lisp index 1bed825..4a08388 100644 --- a/stumpwm/stumpwmrc.lisp +++ b/stumpwm/stumpwmrc.lisp @@ -108,10 +108,11 @@ (setf *screen-mode-line-format* (list "[%n]" '(:eval - (format nil " | ryu: ~D | gmail: ~D | aethon: ~D | " + (format nil " | ryu: ~D | gmail: ~D | aethon: ~D | 9f: ~D | " (get-mail-count "ryuslash.org") (get-mail-count "gmail") - (get-mail-count "aethon"))) + (get-mail-count "aethon") + (get-mail-count "ninthfloor"))) '(:eval (format-expand *window-formatters* *window-format* (current-window))))) @@ -145,7 +146,8 @@ (define-frame-preference "Default" (0 t nil :class "Emacs") (1 t nil :class "Firefox") - (1 t nil :class "URxvt")) + (1 t nil :class "URxvt") + (1 t nil :class "Conkeror")) (if (not (head-mode-line (current-head))) (toggle-mode-line (current-screen) (current-head))) -- cgit v1.2.3-54-g00ecf