aboutsummaryrefslogtreecommitdiffstats
path: root/lisp/progmodes/python.el
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/progmodes/python.el')
-rw-r--r--lisp/progmodes/python.el14
1 files changed, 7 insertions, 7 deletions
diff --git a/lisp/progmodes/python.el b/lisp/progmodes/python.el
index be747d008dd..20266097fed 100644
--- a/lisp/progmodes/python.el
+++ b/lisp/progmodes/python.el
@@ -2301,12 +2301,11 @@ Signals an error if no shell buffer is available for current buffer."
2301 2301
2302(defun python-shell-font-lock-kill-buffer () 2302(defun python-shell-font-lock-kill-buffer ()
2303 "Kill the font-lock buffer safely." 2303 "Kill the font-lock buffer safely."
2304 (python-shell-with-shell-buffer 2304 (when (and python-shell--font-lock-buffer
2305 (when (and python-shell--font-lock-buffer 2305 (buffer-live-p python-shell--font-lock-buffer))
2306 (buffer-live-p python-shell--font-lock-buffer)) 2306 (kill-buffer python-shell--font-lock-buffer)
2307 (kill-buffer python-shell--font-lock-buffer) 2307 (when (derived-mode-p 'inferior-python-mode)
2308 (when (derived-mode-p 'inferior-python-mode) 2308 (setq python-shell--font-lock-buffer nil))))
2309 (setq python-shell--font-lock-buffer nil)))))
2310 2309
2311(defmacro python-shell-font-lock-with-font-lock-buffer (&rest body) 2310(defmacro python-shell-font-lock-with-font-lock-buffer (&rest body)
2312 "Execute the forms in BODY in the font-lock buffer. 2311 "Execute the forms in BODY in the font-lock buffer.
@@ -2357,7 +2356,8 @@ goes wrong and syntax highlighting in the shell gets messed up."
2357(defun python-shell-font-lock-post-command-hook () 2356(defun python-shell-font-lock-post-command-hook ()
2358 "Fontifies current line in shell buffer." 2357 "Fontifies current line in shell buffer."
2359 (let ((prompt-end (cdr (python-util-comint-last-prompt)))) 2358 (let ((prompt-end (cdr (python-util-comint-last-prompt))))
2360 (when (and prompt-end (> (point) prompt-end)) 2359 (when (and prompt-end (> (point) prompt-end)
2360 (process-live-p (get-buffer-process (current-buffer))))
2361 (let* ((input (buffer-substring-no-properties 2361 (let* ((input (buffer-substring-no-properties
2362 prompt-end (point-max))) 2362 prompt-end (point-max)))
2363 (start-pos prompt-end) 2363 (start-pos prompt-end)