Browse Source

org-agenda: Align multibyte tags properly

* lisp/org-agenda.el (org-agenda-align-tags): Let org-agenda align
  multibyte tags properly.
Feng Shu 8 months ago
parent
commit
8a2f4a21a9
1 changed files with 1 additions and 1 deletions
  1. 1 1
      lisp/org-agenda.el

+ 1 - 1
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))