Merge branch 'maint'

This commit is contained in:
Bastien 2018-03-20 14:58:40 +01:00
commit f18823b80a
1 changed files with 1 additions and 1 deletions

View File

@ -5165,7 +5165,7 @@ a string, summarizing TAGS, as a list of strings."
(`(,(or :endgroup :endgrouptag))
(when (eq group-status 'append)
(push (nreverse current-group) groups))
(setq group-status nil))
(setq group-status nil current-group nil))
(`(:grouptags) (setq group-status 'append))
((and `(,tag . ,_) (guard group-status))
(if (eq group-status 'append) (push tag current-group)