procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Fix pdb path handling.

Browse source 
* progmodes/gud.el (pdb): Give pdb full paths, to allow setting
breakpoints in files outside current directory.

* lisp/progmodes/python.el: Require ansi-color at top-level.

Fixes: debbugs:6098
This commit is contained in:
Syver Enstad 2012-01-29 15:06:54 +08:00 • committed by Chong Yidong
parent db17443466
commit 6b25e4e27d
3 changed files with 10 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

7
lisp/ChangeLog
View file

@ -1,5 +1,12 @@
2012-01-29 Syver Enstad <syver.enstad@cisco.com>
* progmodes/gud.el (pdb): Give pdb full paths, to allow setting
breakpoints in files outside current directory (Bug#6098).
2012-01-29 Chong Yidong <cyd@gnu.org>
* progmodes/python.el: Require ansi-color at top-level.
* emacs-lisp/lisp-mode.el (emacs-lisp-mode-abbrev-table): Define
and use in Emacs Lisp mode (Bug#9360).
(lisp-mode-abbrev-table): Add doc.

4
lisp/progmodes/gud.el
View file

@ -1646,8 +1646,8 @@ and source-file directory for your debugger."
(gud-common-init command-line nil 'gud-pdb-marker-filter)
(set (make-local-variable 'gud-minor-mode) 'pdb)
(gud-def gud-break "break %f:%l" "\C-b" "Set breakpoint at current line.")
(gud-def gud-remove "clear %f:%l" "\C-d" "Remove breakpoint at current line")
(gud-def gud-break "break %d%f:%l" "\C-b" "Set breakpoint at current line.")
(gud-def gud-remove "clear %d%f:%l" "\C-d" "Remove breakpoint at current line")
(gud-def gud-step "step" "\C-s" "Step one source line with display.")
(gud-def gud-next "next" "\C-n" "Step one line (skip functions).")
(gud-def gud-cont "continue" "\C-r" "Continue with display.")

3
lisp/progmodes/python.el
View file

@ -67,6 +67,7 @@
;;; Code:
(require 'comint)
(require 'ansi-color)
(eval-when-compile
(require 'compile)
@ -1386,7 +1387,6 @@ For running multiple processes in multiple buffers, see `run-python' and
\\{inferior-python-mode-map}"
:group 'python
(require 'ansi-color) ; for ipython
(setq mode-line-process '(":%s"))
(set (make-local-variable 'comint-input-filter) 'python-input-filter)
(add-hook 'comint-preoutput-filter-functions #'python-preoutput-filter
@ -1530,7 +1530,6 @@ behavior, change `python-remove-cwd-from-path' to nil."
(interactive (if current-prefix-arg
(list (read-string "Run Python: " python-command) nil t)
(list python-command)))
(require 'ansi-color) ; for ipython
(unless cmd (setq cmd python-command))
(python-check-version cmd)
(setq python-command cmd)