summaryrefslogtreecommitdiff
path: root/lisp/org
diff options
context:
space:
mode:
authorCarsten Dominik <dominik@science.uva.nl>2009-02-06 11:47:58 +0000
committerCarsten Dominik <dominik@science.uva.nl>2009-02-06 11:47:58 +0000
commitee9d4ebe94d9af586fcc71ef3f68f2636e4662f6 (patch)
tree5693ac674dc424cd67983408ba329a31c7f6387d /lisp/org
parente9176a6375c587e3bdf76c94b5e457a2c52ca4f4 (diff)
downloademacs-ee9d4ebe94d9af586fcc71ef3f68f2636e4662f6.tar.gz
2009-02-06 Carsten Dominik <dominik@science.uva.nl>
* org-exp.el (org-export-preprocess-string): Fix bug with skipping text before first headline.
Diffstat (limited to 'lisp/org')
-rw-r--r--lisp/org/ChangeLog3
-rw-r--r--lisp/org/org-exp.el2
2 files changed, 4 insertions, 1 deletions
diff --git a/lisp/org/ChangeLog b/lisp/org/ChangeLog
index da098fdba1f..f36f07ae273 100644
--- a/lisp/org/ChangeLog
+++ b/lisp/org/ChangeLog
@@ -1,5 +1,8 @@
2009-02-06 Carsten Dominik <dominik@science.uva.nl>
+ * org-exp.el (org-export-preprocess-string): Fix bug with skipping
+ text before first headline.
+
* org.el (org-format-latex): Stop LaTeX fragment processing in
protected examples.
diff --git a/lisp/org/org-exp.el b/lisp/org/org-exp.el
index e302052a6ec..cf94d5ee433 100644
--- a/lisp/org/org-exp.el
+++ b/lisp/org/org-exp.el
@@ -1538,7 +1538,7 @@ on this string to produce the exported version."
;; Get the correct stuff before the first headline
(when (plist-get parameters :skip-before-1st-heading)
(goto-char (point-min))
- (when (re-search-forward "\\(^#.*\n\\)^\\*+[ \t]" nil t)
+ (when (re-search-forward "^\\(#.*\n\\)?\\*+[ \t]" nil t)
(delete-region (point-min) (match-beginning 0))
(goto-char (point-min))
(insert "\n")))