aboutsummaryrefslogtreecommitdiff
path: root/sx-question-list.el
diff options
context:
space:
mode:
authorArtur Malabarba <bruce.connor.am@gmail.com>2015-02-14 16:44:01 -0200
committerArtur Malabarba <bruce.connor.am@gmail.com>2015-02-14 16:44:01 -0200
commit2f398913b77d190f2e0c96ba15296c231ba21e18 (patch)
treea37da9c39e084ceb2f18092db2a9e5b709c27408 /sx-question-list.el
parentade5fe434b5fd031db8cd4e601f26f2933354ab2 (diff)
Show the site name on the mode-lien
Diffstat (limited to 'sx-question-list.el')
-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)
" ["