Browse Source

org-export: Code typo

* contrib/lisp/org-export.el (org-export-get-parent-headline): Code typo.
Nicolas Goaziou 13 years ago
parent
commit
f4d8a55282
1 changed files with 1 additions and 1 deletions
  1. 1 1
      contrib/lisp/org-export.el

+ 1 - 1
contrib/lisp/org-export.el

@@ -2843,7 +2843,7 @@ links."
   "Return BLOB's closest parent headline or nil."
   "Return BLOB's closest parent headline or nil."
   (catch 'exit
   (catch 'exit
     (mapc
     (mapc
-     (lambda (el) (when (eq (car el) headline) (throw 'exit el)))
+     (lambda (el) (when (eq (car el) 'headline) (throw 'exit el)))
      (plist-get info :genealogy))
      (plist-get info :genealogy))
     nil))
     nil))