Browse Source

Make exporting the enclosing entry with CLASS/TITLE property work better

* lisp/org-exp.el (org-export): Go to next heading before searching
backward, so make this also work if we are on the headline of the
entry with the property...
Carsten Dominik 14 năm trước cách đây
mục cha
commit
b7e3d7d90b
1 tập tin đã thay đổi với 1 bổ sung0 xóa
  1. 1 0
      lisp/org-exp.el

+ 1 - 0
lisp/org-exp.el

@@ -995,6 +995,7 @@ Pressing `1' will switch between these two options."
 		 (message "Export subtree: "))))
 	(when (eq r1 ?\ )
 	  (let ((case-fold-search t))
+	    (outline-next-heading)
 	    (if (re-search-backward
 		 "^[ \t]+\\(:latex_class:\\|:export_title:\\)[ \t]+\\S-"
 		 nil t)