# HG changeset patch # User Stefan Monnier # Date 1157830955 0 # Node ID a15622a85c05d692a21c771594e8416ca1458434 # Parent 06f1e0aa1de04e59a07074958ab09741e7956720 Quieten the compiler about hippie-expand vars. (python-send-string): Be slightly more careful about adding \n. diff -r 06f1e0aa1de0 -r a15622a85c05 lisp/ChangeLog --- a/lisp/ChangeLog Sat Sep 09 19:21:31 2006 +0000 +++ b/lisp/ChangeLog Sat Sep 09 19:42:35 2006 +0000 @@ -1,5 +1,8 @@ 2006-09-09 Stefan Monnier + * progmodes/python.el: Quieten the compiler about hippie-expand vars. + (python-send-string): Be slightly more careful about adding \n. + * startup.el (normal-splash-screen): Don't display the buffer if we'll kill it right away anyway. diff -r 06f1e0aa1de0 -r a15622a85c05 lisp/progmodes/python.el --- a/lisp/progmodes/python.el Sat Sep 09 19:21:31 2006 +0000 +++ b/lisp/progmodes/python.el Sat Sep 09 19:42:35 2006 +0000 @@ -67,7 +67,8 @@ (eval-when-compile (require 'cl) (require 'compile) - (require 'comint)) + (require 'comint) + (require 'hippie-exp)) (autoload 'comint-mode "comint") @@ -1424,11 +1425,13 @@ "Evaluate STRING in inferior Python process." (interactive "sPython command: ") (comint-send-string (python-proc) string) - (comint-send-string (python-proc) - ;; If the string is single-line or if it ends with \n, - ;; only add a single \n, otherwise add 2, so as to - ;; make sure we terminate the multiline instruction. - (if (string-match "\n.+\\'" string) "\n\n" "\n"))) + (unless (string-match "\n\\'" string) + ;; Make sure the text is properly LF-terminated. + (comint-send-string (python-proc) "\n")) + (when (string-match "\n[ \t].*\n?\\'" string) + ;; If the string contains a final indented line, add a second newline so + ;; as to make sure we terminate the multiline instruction. + (comint-send-string (python-proc) "\n"))) (defun python-send-buffer () "Send the current buffer to the inferior Python process."