Преглед на файлове

Merge branch 'master' of orgmode.org:org-mode

Bastien Guerry преди 11 години
родител
ревизия
cdccf1f15b
променени са 1 файла, в които са добавени 1 реда и са изтрити 1 реда
  1. 1 1
      lisp/ob-comint.el

+ 1 - 1
lisp/ob-comint.el

@@ -148,7 +148,7 @@ FILE exists at end of evaluation."
   (if (file-exists-p file) (delete-file file))
   (process-send-string
    (get-buffer-process buffer)
-   (if (string-match "\n$" string) string (concat string "\n")))
+   (if (= (aref string (1- (length string))) ?\n) string (concat string "\n")))
   ;; From Tramp 2.1.19 the following cache flush is not necessary
   (if (file-remote-p default-directory)
       (let (v)