From b7e3d7d90b655153d2a51cab584a5561c18262ec Mon Sep 17 00:00:00 2001
From: Carsten Dominik <carsten.dominik@gmail.com>
Date: Thu, 21 Apr 2011 17:55:18 +0200
Subject: [PATCH] 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...
---
 lisp/org-exp.el | 1 +
 1 file changed, 1 insertion(+)

diff --git a/lisp/org-exp.el b/lisp/org-exp.el
index 053f2b8cd..75051e50c 100644
--- a/lisp/org-exp.el
+++ b/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)