From 587c9885f95c290160382aaa01b67816f2468652 Mon Sep 17 00:00:00 2001 From: Philippe Vaucher Date: Fri, 10 Aug 2018 11:52:13 +0200 Subject: [PATCH] Use less ambiguous sort icons for tabulated list * lisp/emacs-lisp/tabulated-list.el: change sort icons and use "asc/desc" for ASCII. --- lisp/emacs-lisp/tabulated-list.el | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/lisp/emacs-lisp/tabulated-list.el b/lisp/emacs-lisp/tabulated-list.el index 58619ecda..5488471e2 100644 --- a/lisp/emacs-lisp/tabulated-list.el +++ b/lisp/emacs-lisp/tabulated-list.el @@ -176,8 +176,8 @@ If ADVANCE is non-nil, move forward by one line afterwards." (let ((table (make-char-table 'glyphless-char-display nil))) (set-char-table-parent table glyphless-char-display) ;; Some text terminals can't display the Unicode arrows; be safe. - (aset table 9650 (cons nil "^")) - (aset table 9660 (cons nil "v")) + (aset table 9650 (cons nil "desc")) + (aset table 9660 (cons nil "asc")) table) "The `glyphless-char-display' table in Tabulated List buffers.") @@ -229,8 +229,8 @@ Populated by `tabulated-list-init-header'.") (concat label (cond ((> (+ 2 (length label)) width) "") - ((cdr tabulated-list-sort-key) " ▲") - (t " ▼"))) + ((cdr tabulated-list-sort-key) " ◤") + (t " ◣"))) 'face 'bold 'tabulated-list-column-name label button-props)) -- 2.18.0