From d73ba0621e1e73df155a09126ecef8df8c2d232a Mon Sep 17 00:00:00 2001
From: Artur Malabarba <bruce.connor.am@gmail.com>
Date: Sat, 21 Feb 2015 10:48:28 -0200
Subject: Standardize prettification of site names.

---
 sx-question-list.el | 4 +---
 1 file changed, 1 insertion(+), 3 deletions(-)

(limited to 'sx-question-list.el')

diff --git a/sx-question-list.el b/sx-question-list.el
index def490b..32bc140 100644
--- a/sx-question-list.el
+++ b/sx-question-list.el
@@ -397,9 +397,7 @@ Non-interactively, DATA is a question alist."
 (defconst sx-question-list--mode-line-format
   '("   "
     (:propertize
-     (:eval (mapconcat #'capitalize
-                       (split-string sx-question-list--site "\\.")
-                       " "))
+     (:eval (sx--pretty-site-parameter sx-question-list--site))
      face mode-line-buffer-id)
     " " mode-name ": "
     (:propertize sx-question-list--current-tab
-- 
cgit v1.2.3