# HG changeset patch
# User Lute Kamstra <lute@gnu.org>
# Date 1110822296 0
# Node ID 4cc59db6dfeb041e6b36251d1fe7e6a039430aa6
# Parent  2ee584622d0786b1f7aa930099776d524e093ed3
(debugger-make-xrefs): Docstring fix.  Ignore a `*' at the beginning
of a line.

diff -r 2ee584622d07 -r 4cc59db6dfeb lisp/emacs-lisp/debug.el
--- a/lisp/emacs-lisp/debug.el	Mon Mar 14 14:07:38 2005 +0000
+++ b/lisp/emacs-lisp/debug.el	Mon Mar 14 17:44:56 2005 +0000
@@ -302,7 +302,7 @@
   (debugger-make-xrefs))
 
 (defun debugger-make-xrefs (&optional buffer)
-  "Attach cross-references to symbol names in the `*Backtrace*' buffer."
+  "Attach cross-references to function names in the `*Backtrace*' buffer."
   (interactive "b")
   (save-excursion
     (set-buffer (or buffer (current-buffer)))
@@ -353,6 +353,7 @@
       ;; Scan the new part of the backtrace, inserting xrefs.
       (goto-char (point-min))
       (while (progn
+	       (goto-char (+ (point) 2))
 	       (skip-syntax-forward "^w_")
 	       (not (eobp)))
 	(let* ((beg (point))
@@ -364,8 +365,8 @@
 	    (goto-char beg)
 	    ;; help-xref-button needs to operate on something matched
 	    ;; by a regexp, so set that up for it.
-	    (re-search-forward "\\(\\(\\sw\\|\\s_\\)+\\)")
-	    (help-xref-button 1 'help-function-def sym file)))
+	    (re-search-forward "\\(\\sw\\|\\s_\\)+")
+	    (help-xref-button 0 'help-function-def sym file)))
 	(forward-line 1))
       (widen))
     (setq debugger-previous-backtrace (buffer-string))))