[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: Problems with help in the debugger.
From: |
Stefan Monnier |
Subject: |
Re: Problems with help in the debugger. |
Date: |
Wed, 23 Feb 2005 09:18:49 -0500 |
User-agent: |
Gnus/5.11 (Gnus v5.11) Emacs/22.0.50 (gnu/linux) |
> Even though some-fun is not visibly marked in any way (this seems a
> bug), I can still move the cursor on it and press enter to get a
> description of the function:
Not marking it is just a lack of feature, not a bug. The fact that you can
click on any piece of text and Emacs will interpret it as
a function/variable name and describe it to you is a feature.
W.r.t the [back] button, does the patch below fix it for you?
Stefan
*** orig/lisp/emacs-lisp/debug.el
--- mod/lisp/emacs-lisp/debug.el
***************
*** 723,741 ****
(defun debugger-list-functions ()
"Display a list of all the functions now set to debug on entry."
(interactive)
! (with-output-to-temp-buffer "*Help*"
! (if (null debug-function-list)
! (princ "No debug-on-entry functions now\n")
! (princ "Functions set to debug on entry:\n\n")
! (let ((list debug-function-list))
! (while list
! (prin1 (car list))
! (terpri)
! (setq list (cdr list))))
! (princ "Note: if you have redefined a function, then it may no
longer\n")
! (princ "be set to debug on entry, even if it is in the list."))
(with-current-buffer standard-output
! (help-mode))))
(provide 'debug)
--- 723,743 ----
(defun debugger-list-functions ()
"Display a list of all the functions now set to debug on entry."
(interactive)
! (require 'help-mode)
! (help-setup-xref '(debugger-list-functions) (interactive-p))
! (with-output-to-temp-buffer (help-buffer)
(with-current-buffer standard-output
! (if (null debug-function-list)
! (princ "No debug-on-entry functions now\n")
! (princ "Functions set to debug on entry:\n\n")
! (dolist (fun debug-function-list)
! (make-text-button (point) (progn (prin1 fun) (point))
! 'type 'help-function
! 'help-args (list fun))
! (terpri))
! (terpri)
! (princ "Note: if you have redefined a function, then it may no
longer\n")
! (princ "be set to debug on entry, even if it is in the list.")))))
(provide 'debug)