]> git.eshelyaron.com Git - emacs.git/commitdiff
Make `python-shell-send-string-no-output' delete trailing newlines from output.
authorFabián Ezequiel Gallina <fgallina@cuca>
Thu, 17 May 2012 03:03:30 +0000 (00:03 -0300)
committerFabián Ezequiel Gallina <fgallina@gnu.org>
Thu, 17 May 2012 03:03:30 +0000 (00:03 -0300)
lisp/progmodes/python.el

index a2f1ed4e80943aff8e390d1262212cfe4b9d525f..f75b5cb51ae12084150ef631d35c9f9492f99213 100644 (file)
@@ -1467,16 +1467,14 @@ the output."
                       "")))))
     (python-shell-send-string string process msg)
     (accept-process-output process)
-    (mapconcat
-     (lambda (string) string)
-     (split-string
-      output-buffer
-      (if (> (length python-shell-prompt-output-regexp) 0)
-          (format "\n*%s$\\|^%s"
-                  python-shell-prompt-regexp
-                  (or python-shell-prompt-output-regexp ""))
-        (format "\n$\\|^%s"
-                python-shell-prompt-regexp)) t) "\n")))
+    (replace-regexp-in-string
+     (if (> (length python-shell-prompt-output-regexp) 0)
+         (format "\n*%s$\\|^%s\\|\n$"
+                 python-shell-prompt-regexp
+                 (or python-shell-prompt-output-regexp ""))
+       (format "\n*$\\|^%s\\|\n$"
+               python-shell-prompt-regexp))
+     "" output-buffer)))
 
 (defun python-shell-internal-send-string (string)
   "Send STRING to the Internal Python interpreter.