diff options
author | Bastien Guerry <bzg@altern.org> | 2011-12-23 17:40:37 +0100 |
---|---|---|
committer | Bastien Guerry <bzg@altern.org> | 2012-01-03 09:14:36 +0100 |
commit | 090f802003f595c5f3f093a2f326374d8a347467 (patch) | |
tree | dc9721503b73223367531a06adddab708ede3198 | |
parent | 26d54bbc805c015dd5619a95f945ba2f151bae82 (diff) | |
download | org-mode-090f802003f595c5f3f093a2f326374d8a347467.tar.gz |
org-exp-blocks.el: Fix regexp for matching the end of a block.
* org-exp-blocks.el (org-export-blocks-preprocess): Fix regexp
for matching the end of a block.
Thanks to Robert Lupton the Good for reporting this and to Nick
Dokos for digging the issue further.
-rw-r--r-- | lisp/org-exp-blocks.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/org-exp-blocks.el b/lisp/org-exp-blocks.el index 940068a..3396d58 100644 --- a/lisp/org-exp-blocks.el +++ b/lisp/org-exp-blocks.el @@ -178,7 +178,7 @@ which defaults to the value of `org-export-blocks-witheld'." (let* ((match-start (copy-marker (match-beginning 0))) (body-start (copy-marker (match-end 0))) (indentation (length (match-string 1))) - (inner-re (format "[\r\n][ \t]*#\\+\\(begin\\|end\\)_%s" + (inner-re (format "^[ \t]*#\\+\\(begin\\|end\\)_%s" (regexp-quote (downcase (match-string 2))))) (type (intern (downcase (match-string 2)))) (headers (save-match-data |