diff options
| author | Xu Chunyang | 2018-05-06 22:46:04 +0300 |
|---|---|---|
| committer | Eli Zaretskii | 2018-05-06 22:46:04 +0300 |
| commit | 1d732d699d63b5dbfa7d0a0f44e6119d58f852bc (patch) | |
| tree | 5ad4711639ca87e07cb05f14bc5b668ac41b7cb7 | |
| parent | 91a68b5f61db50344c6a5df497f55370d54a7b15 (diff) | |
| download | emacs-1d732d699d63b5dbfa7d0a0f44e6119d58f852bc.tar.gz emacs-1d732d699d63b5dbfa7d0a0f44e6119d58f852bc.zip | |
Fix gud-statement for pdb
* lisp/progmodes/gud.el (pdb): Fix the gud-print implementation.
(Bug#31363)
| -rw-r--r-- | lisp/progmodes/gud.el | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/lisp/progmodes/gud.el b/lisp/progmodes/gud.el index 15b428bb68b..9cf818e99ea 100644 --- a/lisp/progmodes/gud.el +++ b/lisp/progmodes/gud.el | |||
| @@ -1694,8 +1694,7 @@ and source-file directory for your debugger." | |||
| 1694 | (gud-def gud-up "up" "<" "Up one stack frame.") | 1694 | (gud-def gud-up "up" "<" "Up one stack frame.") |
| 1695 | (gud-def gud-down "down" ">" "Down one stack frame.") | 1695 | (gud-def gud-down "down" ">" "Down one stack frame.") |
| 1696 | (gud-def gud-print "p %e" "\C-p" "Evaluate Python expression at point.") | 1696 | (gud-def gud-print "p %e" "\C-p" "Evaluate Python expression at point.") |
| 1697 | ;; Is this right? | 1697 | (gud-def gud-statement "!%e" "\C-e" "Execute Python statement at point.") |
| 1698 | (gud-def gud-statement "! %e" "\C-e" "Execute Python statement at point.") | ||
| 1699 | 1698 | ||
| 1700 | ;; (setq comint-prompt-regexp "^(.*pdb[+]?) *") | 1699 | ;; (setq comint-prompt-regexp "^(.*pdb[+]?) *") |
| 1701 | (setq comint-prompt-regexp "^(Pdb) *") | 1700 | (setq comint-prompt-regexp "^(Pdb) *") |