aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--lisp/ChangeLog9
-rw-r--r--lisp/emacs-lisp/debug.el2
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 @@
12001-11-09 Sam Steingold <sds@gnu.org>
2
3 * emacs-lisp/debug.el (debugger-make-xrefs):
4 Add buttons to all symbols.
5
12001-11-09 Andre Spiegel <spiegel@gnu.org> 62001-11-09 Andre Spiegel <spiegel@gnu.org>
2 7
3 * vc.el: Add John David Smith to credits. 8 * vc.el: Add John David Smith to credits.
4 9
5 Suggested by Kalle Olavi Niemitalo <kon@iki.fi>: 10 Suggested by Kalle Olavi Niemitalo <kon@iki.fi>:
6 11
7 * vc-hooks.el (vc-error-occured): Backquotified. 12 * vc-hooks.el (vc-error-occured): Backquotified.
8 (vc-file-prop-obarray): Use prime length for better efficiency. 13 (vc-file-prop-obarray): Use prime length for better efficiency.
9 14
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."
277 (set-buffer (or buffer (current-buffer))) 277 (set-buffer (or buffer (current-buffer)))
278 (goto-char (point-min)) 278 (goto-char (point-min))
279 (let ((buffer-read-only nil)) 279 (let ((buffer-read-only nil))
280 (while (re-search-forward "^[* ] (?\\(\\(\\sw\\|\\s_\\)+\\)" nil t) 280 (while (re-search-forward "\\(\\(\\sw\\|\\s_\\)+\\)" nil t)
281 (let* ((sym (intern-soft (match-string 1))) 281 (let* ((sym (intern-soft (match-string 1)))
282 (file (symbol-file sym))) 282 (file (symbol-file sym)))
283 (when file (help-xref-button 1 'help-function-def sym file))))))) 283 (when file (help-xref-button 1 'help-function-def sym file)))))))