fixed minor bug in and improved efficiency of org-babel-map-src-blocks

* lisp/ob.el (org-babel-map-src-blocks): fixed minor bug in and
  improved efficiency of org-babel-map-src-blocks
This commit is contained in:
Eric Schulte 2010-10-20 11:02:35 -06:00 committed by Dan Davison
parent 5bdc043919
commit b50125a1ac
1 changed files with 3 additions and 4 deletions

View File

@ -803,10 +803,9 @@ end-body --------- point at the end of the body"
(body (match-string 5))
(beg-body (match-beginning 5))
(end-body (match-end 5)))
(save-match-data ,@body))
(goto-char (match-end 0))))
(unless visited-p
(kill-buffer to-be-removed))
,@body
(goto-char end-block))))
(unless visited-p (kill-buffer to-be-removed))
(goto-char point)))
(defvar org-file-properties)