Commit 6ac2041b authored by Fabián Ezequiel Gallina's avatar Fabián Ezequiel Gallina Committed by Fabián Ezequiel Gallina
Browse files

Cleanup prompts when sending region to shell.

parent 45c138ac
...@@ -1002,7 +1002,8 @@ commands.)" ...@@ -1002,7 +1002,8 @@ commands.)"
(let* ((contents (buffer-substring start end)) (let* ((contents (buffer-substring start end))
(current-file (buffer-file-name)) (current-file (buffer-file-name))
(process (python-shell-get-or-create-process)) (process (python-shell-get-or-create-process))
(temp-file (make-temp-file "py"))) (temp-file (make-temp-file "py"))
(process-buffer (process-buffer process)))
(with-temp-file temp-file (with-temp-file temp-file
(insert contents) (insert contents)
(delete-trailing-whitespace) (delete-trailing-whitespace)
...@@ -1012,7 +1013,11 @@ commands.)" ...@@ -1012,7 +1013,11 @@ commands.)"
(line-end-position))))) (line-end-position)))))
(with-current-buffer (process-buffer process) (with-current-buffer (process-buffer process)
(setq inferior-python-mode-current-file current-file) (setq inferior-python-mode-current-file current-file)
(setq inferior-python-mode-current-temp-file temp-file)) (setq inferior-python-mode-current-temp-file temp-file)
(delete-region (save-excursion
(move-to-column 0)
(point-marker))
(line-end-position)))
(comint-send-string process (format "execfile(r'%s')\n" temp-file)))) (comint-send-string process (format "execfile(r'%s')\n" temp-file))))
(defun python-shell-send-buffer () (defun python-shell-send-buffer ()
...@@ -1146,7 +1151,6 @@ It is specially designed to be added to the ...@@ -1146,7 +1151,6 @@ It is specially designed to be added to the
(display-completion-list (display-completion-list
(all-completions input completions)))))))) (all-completions input completions))))))))
(defun python-shell-completion-complete-or-indent () (defun python-shell-completion-complete-or-indent ()
"Complete or indent depending on the context. "Complete or indent depending on the context.
If content before pointer is all whitespace indent. If not try to If content before pointer is all whitespace indent. If not try to
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment