babel: Bug fix in `org-babel-map-src-blocks'

* ob.el (org-babel-map-src-blocks): Store correct value of `end-block'
2010-10-17 17:35:53 +01:00 · 2010-10-17 17:35:53 +01:00 · ba9236054a
parent a6d30d3b9b
commit ba9236054a
1 changed files with 1 additions and 1 deletions
--- a/lisp/ob.el
+++ b/lisp/ob.el
@ -750,7 +750,7 @@ end-body --------- point at the end of the body"
         (goto-char (match-beginning 0))
 	 (let ((full-block (match-string 0))
 	       (beg-block (match-beginning 0))
-	       (end-block (match-beginning 0))
+	       (end-block (match-end 0))
 	       (lang (match-string 2))
 	       (beg-lang (match-beginning 2))
 	       (end-lang (match-end 2))