Explorar o código

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

Bastien Guerry %!s(int64=11) %!d(string=hai) anos
pai
achega
cdccf1f15b
Modificáronse 1 ficheiros con 1 adicións e 1 borrados
  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)