From 34decfdb951b0b8a2cf417aa92be9d36c709e78c Mon Sep 17 00:00:00 2001 From: Sam Steingold Date: Fri, 9 Nov 2001 17:07:24 +0000 Subject: [PATCH] (debugger-make-xrefs): Add buttons to all symbols. --- lisp/ChangeLog | 9 +++++++-- lisp/emacs-lisp/debug.el | 2 +- 2 files changed, 8 insertions(+), 3 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index ffbaaa6944b..28d65b6fced 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,9 +1,14 @@ +2001-11-09 Sam Steingold + + * emacs-lisp/debug.el (debugger-make-xrefs): + Add buttons to all symbols. + 2001-11-09 Andre Spiegel * vc.el: Add John David Smith to credits. - + Suggested by Kalle Olavi Niemitalo : - + * vc-hooks.el (vc-error-occured): Backquotified. (vc-file-prop-obarray): Use prime length for better efficiency. diff --git a/lisp/emacs-lisp/debug.el b/lisp/emacs-lisp/debug.el index 49303ff6293..15158440945 100644 --- a/lisp/emacs-lisp/debug.el +++ b/lisp/emacs-lisp/debug.el @@ -277,7 +277,7 @@ That buffer should be current already." (set-buffer (or buffer (current-buffer))) (goto-char (point-min)) (let ((buffer-read-only nil)) - (while (re-search-forward "^[* ] (?\\(\\(\\sw\\|\\s_\\)+\\)" nil t) + (while (re-search-forward "\\(\\(\\sw\\|\\s_\\)+\\)" nil t) (let* ((sym (intern-soft (match-string 1))) (file (symbol-file sym))) (when file (help-xref-button 1 'help-function-def sym file))))))) -- 2.39.2