diff options
| author | Stefan Kangas | 2019-06-30 19:17:52 +0200 |
|---|---|---|
| committer | Eli Zaretskii | 2019-07-06 12:08:44 +0300 |
| commit | 64684356595be58ec939939997d16bc8cf624825 (patch) | |
| tree | ac12343813e8d53d4fa4843aead0f9a9277caa47 | |
| parent | c0d1a228ff30f7605a464e759e4a88aa0913b51f (diff) | |
| download | emacs-64684356595be58ec939939997d16bc8cf624825.tar.gz emacs-64684356595be58ec939939997d16bc8cf624825.zip | |
Make "M-x pdb" use "[:graph:]" to match file names
* lisp/progmodes/gud.el (gud-pdb-marker-regexp): Use "[:graph:]" to
match file name in prompt. (Bug#34489)
| -rw-r--r-- | lisp/progmodes/gud.el | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/lisp/progmodes/gud.el b/lisp/progmodes/gud.el index 4306f5daa02..6b152b7b902 100644 --- a/lisp/progmodes/gud.el +++ b/lisp/progmodes/gud.el | |||
| @@ -1605,8 +1605,12 @@ and source-file directory for your debugger." | |||
| 1605 | 1605 | ||
| 1606 | ;; Last group is for return value, e.g. "> test.py(2)foo()->None" | 1606 | ;; Last group is for return value, e.g. "> test.py(2)foo()->None" |
| 1607 | ;; Either file or function name may be omitted: "> <string>(0)?()" | 1607 | ;; Either file or function name may be omitted: "> <string>(0)?()" |
| 1608 | ;; | ||
| 1609 | ;; We use [:graph:] to be very allowing with regards to which | ||
| 1610 | ;; characters we match in the file name shown in the prompt. | ||
| 1611 | ;; (Of course, this matches the "<string>" case too.) | ||
| 1608 | (defvar gud-pdb-marker-regexp | 1612 | (defvar gud-pdb-marker-regexp |
| 1609 | "^> \\([-a-zA-Z0-9_/.:@ \\]*\\|<string>\\)(\\([0-9]+\\))\\([a-zA-Z0-9_]*\\|\\?\\|<module>\\)()\\(->[^\n\r]*\\)?[\n\r]") | 1613 | "^> \\([[:graph:] \\]*\\)(\\([0-9]+\\))\\([a-zA-Z0-9_]*\\|\\?\\|<module>\\)()\\(->[^\n\r]*\\)?[\n\r]") |
| 1610 | 1614 | ||
| 1611 | (defvar gud-pdb-marker-regexp-file-group 1) | 1615 | (defvar gud-pdb-marker-regexp-file-group 1) |
| 1612 | (defvar gud-pdb-marker-regexp-line-group 2) | 1616 | (defvar gud-pdb-marker-regexp-line-group 2) |