Rooba
/
cpython
mirror of https://github.com/python/cpython.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

More ME patches: 

(py-shell): Recognize the Python debugger prompt

(py-jump-to-exception): Force into python-mode any buffer that gets
jumped to on exception.  Cope with py-exception-buffer possibly a
cons.
This commit is contained in:
Barry Warsaw 1998-05-19 15:01:06 +00:00
parent 145ab1ce9d
commit ebc7b7ac45
1 changed files with 7 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
Misc/python-mode.el
View File

@ -1252,7 +1252,7 @@ filter."
(switch-to-buffer-other-window (switch-to-buffer-other-window
(apply 'make-comint py-which-bufname py-which-shell nil py-which-args)) (apply 'make-comint py-which-bufname py-which-shell nil py-which-args))
(make-local-variable 'comint-prompt-regexp) (make-local-variable 'comint-prompt-regexp)
(setq comint-prompt-regexp "^>>> \\|^[.][.][.] ") (setq comint-prompt-regexp "^>>> \\|^[.][.][.] \\|^(pdb) ")
(set-process-filter (get-buffer-process (current-buffer)) 'py-process-filter) (set-process-filter (get-buffer-process (current-buffer)) 'py-process-filter)
(set-syntax-table py-mode-syntax-table) (set-syntax-table py-mode-syntax-table)
;; set up keybindings for this subshell ;; set up keybindings for this subshell
@ -1354,7 +1354,9 @@ See the `\\[py-execute-region]' docs for an account of some subtleties."
(defun py-jump-to-exception (file line) (defun py-jump-to-exception (file line)
(let ((buffer (cond ((string-equal file "<stdin>") (let ((buffer (cond ((string-equal file "<stdin>")
py-exception-buffer) (if (consp py-exception-buffer)
(cdr py-exception-buffer)
py-exception-buffer))
((and (consp py-exception-buffer) ((and (consp py-exception-buffer)
(string-equal file (car py-exception-buffer))) (string-equal file (car py-exception-buffer)))
(cdr py-exception-buffer)) (cdr py-exception-buffer))
@ -1365,6 +1367,9 @@ See the `\\[py-execute-region]' docs for an account of some subtleties."
nil nil
file t)))))) file t))))))
(pop-to-buffer buffer) (pop-to-buffer buffer)
;; Force Python mode
(if (not (eq major-mode) 'python-mode)
(python-mode))
(goto-line line) (goto-line line)
(message "Jumping to exception in file %s on line %d" file line))) (message "Jumping to exception in file %s on line %d" file line)))