From 090f802003f595c5f3f093a2f326374d8a347467 Mon Sep 17 00:00:00 2001 From: Bastien Guerry Date: Fri, 23 Dec 2011 17:40:37 +0100 Subject: [PATCH] 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. --- lisp/org-exp-blocks.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lisp/org-exp-blocks.el b/lisp/org-exp-blocks.el index 940068aee..3396d5812 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