瀏覽代碼

Merge branch 'origin-maint'

Eric Schulte 13 年之前
父節點
當前提交
68c5a2f840
共有 1 個文件被更改,包括 2 次插入1 次删除
  1. 2 1
      lisp/ob.el

+ 2 - 1
lisp/ob.el

@@ -1214,7 +1214,8 @@ may be specified in the properties of the current outline entry."
 		      (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