diff options
| author | Martin Kampas <martin.kampas@hidden> | 2018-03-21 02:12:42 +0100 |
|---|---|---|
| committer | Bastien <bzg@gnu.org> | 2018-03-21 02:12:42 +0100 |
| commit | 894ec00e9f79b0de93e6a0c947c7d7990c821037 (patch) | |
| tree | fa18237421d29074df21c06a7b6e645e68d6aacd | |
| parent | e28a5a66ad87914a8c52ce8505859fc4ad83d505 (diff) | |
| download | org-mode-894ec00e9f79b0de93e6a0c947c7d7990c821037.tar.gz | |
org.el: Fix recursion stop condition when expanding tags
* lisp/org.el (org-expand-tags): Fix recursion stop condition.
See http://lists.gnu.org/r/emacs-orgmode/2018-03/msg00228.html
TINYCHANGE
| -rw-r--r-- | lisp/org.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/org.el b/lisp/org.el index 333e143..7454796 100644 --- a/lisp/org.el +++ b/lisp/org.el @@ -14553,7 +14553,7 @@ When DOWNCASE is non-nil, expand downcased TAGS." (tag (match-string 2 return-match)) (tag (if downcased (downcase tag) tag))) (unless (or (get-text-property 0 'grouptag (match-string 2 return-match)) - (member tag work-already-expanded)) + (member tag tags-already-expanded)) (setq tags-in-group (assoc tag taggroups)) (push tag work-already-expanded) ;; Recursively expand each tag in the group, if the tag hasn't |