From: Luc Teirlinck Date: Mon, 6 Mar 2006 01:28:54 +0000 (+0000) Subject: (gud-jdb-marker-filter): Double quote `[' in regexp for Lisp syntax. X-Git-Tag: emacs-pretest-22.0.90~3779 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=40813c0814c613b2b77467cc155ae3eb1551054a;p=emacs.git (gud-jdb-marker-filter): Double quote `[' in regexp for Lisp syntax. --- diff --git a/lisp/progmodes/gud.el b/lisp/progmodes/gud.el index 31c8fe0e8a2..667b0462a36 100644 --- a/lisp/progmodes/gud.el +++ b/lisp/progmodes/gud.el @@ -399,7 +399,7 @@ t means that there is no stack, and we are in display-file mode.") 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 @@ To run GDB in text command mode, set `gud-gdb-command-name' to (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 @@ nil) ;; 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)