From 8a2f4a21a919ac8ab7be6758bf464b3b285b964b Mon Sep 17 00:00:00 2001 From: Feng Shu Date: Thu, 28 Feb 2019 21:24:26 +0800 Subject: [PATCH] org-agenda: Align multibyte tags properly * lisp/org-agenda.el (org-agenda-align-tags): Let org-agenda align multibyte tags properly. --- lisp/org-agenda.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lisp/org-agenda.el b/lisp/org-agenda.el index 4a0604a9b..40de26c0d 100644 --- a/lisp/org-agenda.el +++ b/lisp/org-agenda.el @@ -9022,7 +9022,7 @@ current line." (if (memq 'org-tag prop) prop (cons 'org-tag prop)))))) - (setq l (- (match-end 1) (match-beginning 1)) + (setq l (string-width (match-string 1)) c (if (< org-agenda-tags-column 0) (- (abs org-agenda-tags-column) l) org-agenda-tags-column))