[Emacs-diffs] /srv/bzr/emacs/emacs-24 r108001: ob.el: Fix bug.

[Bastien Guerry]

------------------------------------------------------------
revno: 108001
committer: Bastien Guerry <address@hidden>
branch nick: emacs-24
timestamp: Wed 2012-05-16 23:53:39 +0200
message:
  ob.el: Fix bug.
modified:
  lisp/org/ChangeLog
  lisp/org/ob.el

=== modified file 'lisp/org/ChangeLog'
--- a/lisp/org/ChangeLog        2012-05-16 17:33:50 +0000
+++ b/lisp/org/ChangeLog        2012-05-16 21:53:39 +0000
@@ -1,3 +1,8 @@
+2012-05-16  Eric Schulte  <address@hidden>
+
+       * ob.el (org-babel-parse-src-block-match): Save match data during
+       indentation check.
+
 2012-05-16  Bastien Guerry  <address@hidden>
 
        * org.el (org-scan-tags): Correctly match TODO keywords.

=== modified file 'lisp/org/ob.el'
--- a/lisp/org/ob.el    2012-05-16 17:33:50 +0000
+++ b/lisp/org/ob.el    2012-05-16 21:53:39 +0000
@@ -1159,7 +1159,8 @@
                      (substring body 0 sub-length)
                    (or body "")))))
         (preserve-indentation (or org-src-preserve-indentation
-                                  (string-match "-i\\>" switches))))
+                                  (save-match-data
+                                    (string-match "-i\\>" switches)))))
     (list lang
           ;; get block body less properties, protective commas, and indentation
           (with-temp-buffer