Bugfix in `org-back-to-heading'.

prevent `org-back-to-heading' from throwing an error when getting tags
before headlines.  This error was reported by Joel J. Adamson.
This commit is contained in:
Bastien Guerry 2008-03-06 20:22:38 +00:00
parent fb8db4d36c
commit dcba1a960c
2 changed files with 3 additions and 2 deletions

View File

@ -1,7 +1,8 @@
2008-03-06 Bastien Guerry <bzg@altern.org>
* org.el (org-get-legal-level): Aliased to `org-get-valid-level'.
* org.el (org-get-tags-at): Bugfix: prevent `org-back-to-heading'
from throwing an error when getting tags before headlines.
2008-03-06 Carsten Dominik <dominik@science.uva.nl>

2
org.el
View File

@ -23319,8 +23319,8 @@ the tags of the current headline come last."
(widen)
(goto-char (or pos (point)))
(save-match-data
(org-back-to-heading t)
(condition-case nil
(org-back-to-heading t)
(while (not (equal lastpos (point)))
(setq lastpos (point))
(if (looking-at (org-re "[^\r\n]+?:\\([[:alnum:]_@:]+\\):[ \t]*$"))