Mercurial > emacs
changeset 69291:928466fb1966
(gud-jdb-marker-filter): Double quote `[' in regexp for Lisp syntax.
| author | Luc Teirlinck <teirllm@auburn.edu> |
|---|---|
| date | Mon, 06 Mar 2006 01:28:54 +0000 |
| parents | 1248c4b55c0c |
| children | 10abb9aff651 |
| files | lisp/progmodes/gud.el |
| diffstat | 1 files changed, 3 insertions(+), 3 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/progmodes/gud.el Mon Mar 06 01:23:32 2006 +0000 +++ b/lisp/progmodes/gud.el Mon Mar 06 01:28:54 2006 +0000 @@ -399,7 +399,7 @@ gud-speedbar-key-map gud-expansion-speedbar-buttons)) - (add-to-list + (add-to-list 'speedbar-mode-functions-list '("GUD" (speedbar-item-info . gud-speedbar-item-info) (speedbar-line-directory . ignore)))) @@ -684,7 +684,7 @@ (buffer-name gud-comint-buffer) (with-current-buffer gud-comint-buffer (eq gud-minor-mode 'gdba))) (error "Multiple debugging is only supported with \"gdb --fullname\"")) - + (gud-common-init command-line nil 'gud-gdb-marker-filter) (set (make-local-variable 'gud-minor-mode) 'gdb) @@ -2152,7 +2152,7 @@ ;; print line numbers using LOCALE, inserting a comma or a ;; period at the thousands positions (how ingenious!). - "\\(\[[0-9]+\] \\)*\\([a-zA-Z0-9.$_]+\\)\\.[a-zA-Z0-9$_<>(),]+ \ + "\\(\\[[0-9]+] \\)*\\([a-zA-Z0-9.$_]+\\)\\.[a-zA-Z0-9$_<>(),]+ \ \\(([a-zA-Z0-9.$_]+:\\|line=\\)\\([0-9.,]+\\)" gud-marker-acc)