aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorArtur Malabarba <bruce.connor.am@gmail.com>2014-12-03 15:39:51 +0000
committerArtur Malabarba <bruce.connor.am@gmail.com>2014-12-03 15:39:51 +0000
commit62615786ec83d959ee4e6e9db7da7198dbebe04e (patch)
treee46a6960b1cd8c27782a6f611833961e94ca191a
parent4b3fa6cf6171950d4ed48de736395f8e74c6709f (diff)
Fix unicode display on question list
-rw-r--r--sx-question-list.el10
1 files changed, 7 insertions, 3 deletions
diff --git a/sx-question-list.el b/sx-question-list.el
index 628de30..c5c32d9 100644
--- a/sx-question-list.el
+++ b/sx-question-list.el
@@ -263,9 +263,9 @@ into consideration.
;; it's not terribly intuitive.
(setq tabulated-list-sort-key nil)
(add-hook 'tabulated-list-revert-hook
- #'sx-question-list-refresh nil t)
+ #'sx-question-list-refresh nil t)
(add-hook 'tabulated-list-revert-hook
- #'sx-question-list--update-mode-line nil t)
+ #'sx-question-list--update-mode-line nil t)
(tabulated-list-init-header))
(defcustom sx-question-list-date-sort-method 'last_activity_date
@@ -398,7 +398,11 @@ a new list before redisplaying."
(setq tabulated-list-entries
(mapcar sx-question-list--print-function
(cl-remove-if #'sx-question--hidden-p question-list)))
- (when redisplay (tabulated-list-print 'remember))
+ (when redisplay
+ (tabulated-list-print 'remember)
+ ;; Display weird chars correctly
+ (set-buffer-multibyte nil)
+ (set-buffer-multibyte t))
(when window
(set-window-start window old-start)))
(sx-message "Done."))