org-element: Complete 2125806
authorNicolas Goaziou <mail@nicolasgoaziou.fr>
Sun, 31 Aug 2014 17:11:29 +0000 (19:11 +0200)
committerNicolas Goaziou <mail@nicolasgoaziou.fr>
Sun, 31 Aug 2014 17:11:29 +0000 (19:11 +0200)
* lisp/org-element.el (org-element--parse-to): Do not bother checking
  for a planning line at the beginning of buffer.

lisp/org-element.el

index d70cd99..2eca350 100644 (file)
@@ -5236,10 +5236,10 @@ the process stopped before finding the expected result."
         ;; buffer.
         ((not cached)
          (when (org-with-limited-levels (outline-previous-heading))
-           (forward-line))
+           (setq mode 'planning)
+          (forward-line))
          (skip-chars-forward " \r\t\n")
-         (beginning-of-line)
-        (setq mode 'planning))
+         (beginning-of-line))
         ;; Cache returned exact match: return it.
         ((= pos begin)
         (throw 'exit (if syncp (org-element-property :parent cached) cached)))