diff options
author | Eric Schulte <schulte.eric@gmail.com> | 2010-10-20 11:02:35 -0600 |
---|---|---|
committer | Dan Davison <davison@stats.ox.ac.uk> | 2010-10-21 13:06:56 +0100 |
commit | b50125a1ac1aacba84162131790fc684d5d21298 (patch) | |
tree | 652b2028ed5b4d391547979d413a21e3ab58d575 | |
parent | 5bdc0439191a64bd7ea0c410691b925164edbb51 (diff) | |
download | org-mode-b50125a1ac1aacba84162131790fc684d5d21298.tar.gz |
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
-rw-r--r-- | lisp/ob.el | 7 |
1 files changed, 3 insertions, 4 deletions
@@ -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) |