瀏覽代碼

org-src.el (org-edit-src-exit): Fix editing source section with blank lines

* org-src.el (org-edit-src-exit): Fix editing source section
with blank lines.

TINYCHANGE

This bug was introduced by commit aba9e2b9.
Le Wang 12 年之前
父節點
當前提交
d22e732d7a
共有 1 個文件被更改,包括 1 次插入1 次删除
  1. 1 1
      lisp/org-src.el

+ 1 - 1
lisp/org-src.el

@@ -690,7 +690,7 @@ with \",*\", \",#+\", \",,*\" and \",,#+\"."
     (goto-char beg)
     (when allow-write-back-p
       (delete-region beg (max beg (1- end)))
-      (unless (string-match "^[ \t]*$" code)
+      (unless (string-match "\\`[ \t]*\\'" code)
 	(insert code)
 	(delete-char 1))
       (goto-char beg)