Skip to content

Commit

Permalink
org-fast-tag-selection: Make group tags separator not break alignment
Browse files Browse the repository at this point in the history
* lisp/org.el (org-fast-tag-selection): Start " : " group tags
separator before tag column in the menu.

Reported in https://orgmode.org/list/62f04f7c.d40a0220.9da67.0a2cSMTPIN_ADDED_BROKEN@mx.google.com
  • Loading branch information
Ihor Radchenko committed Aug 22, 2022
1 parent 5184c43 commit 090dacb
Showing 1 changed file with 3 additions and 1 deletion.
4 changes: 3 additions & 1 deletion lisp/org.el
Original file line number Diff line number Diff line change
Expand Up @@ -11755,7 +11755,9 @@ Returns the new tags string, or nil to not change the current settings."
(while (equal (car tbl) '(:newline))
(insert "\n")
(setq tbl (cdr tbl)))))
((equal e '(:grouptags)) (insert " : "))
((equal e '(:grouptags))
(delete-char -3)
(insert " : "))
(t
(setq tg (copy-sequence (car e)) c2 nil)
(if (cdr e)
Expand Down

0 comments on commit 090dacb

Please sign in to comment.