Merge branch 'maint'

This commit is contained in:
Bastien Guerry 2013-05-16 17:07:32 +02:00
commit 3ce5b3bb22
1 changed files with 5 additions and 3 deletions

View File

@ -4913,10 +4913,12 @@ Support for group tags is controlled by the option
(setq ret (save-match-data
(org-set-regexps-and-options-for-tags)))))
;; Append setupfile tags to existing tags
(setq org-file-tags (append org-file-tags (nth 0 ret))
org-tag-alist (append org-tag-alist (nth 1 ret))
(setq org-file-tags
(delq nil (append org-file-tags (nth 0 ret)))
org-tag-alist
(delq nil (append org-tag-alist (nth 1 ret)))
org-tag-groups-alist
(append org-tag-groups-alist (nth 2 ret)))))
(delq nil (append org-tag-groups-alist (nth 2 ret))))))
(and ext-setup-or-nil
(string-match re ext-setup-or-nil start)
(setq start (match-end 0)))