aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--sx-question-list.el8
1 files changed, 7 insertions, 1 deletions
diff --git a/sx-question-list.el b/sx-question-list.el
index de15704..06af161 100644
--- a/sx-question-list.el
+++ b/sx-question-list.el
@@ -400,7 +400,13 @@ Non-interactively, DATA is a question alist."
"Variable describing current tab being viewed.")
(defconst sx-question-list--mode-line-format
- '(" " mode-name ": "
+ '(" "
+ (:propertize
+ (:eval (mapconcat #'capitalize
+ (split-string sx-question-list--site "\\.")
+ " "))
+ face mode-line-buffer-id)
+ " " mode-name ": "
(:propertize sx-question-list--current-tab
face mode-line-buffer-id)
" ["