|--==> "APA" == Adrian Aichner <Adrian.Aichner(a)t-online.de> writes:
>>>>>"SY" == Steve Youngs
<youngs(a)xemacs.org> writes:
APA> Hi Steve,
APA> following seems to work fine for me (your code wrapped in flet for
APA> `append-message' and `clear-message'):
APA> Perhaps it's only one or the other that's required.
APA> I ripped the flet right out of my
APA> xemacsweb/batch-psgml-validate.el
APA> To be honest, this solution is not my own invention. It was
APA> recommended to me by another review board member.
I won't tell anyone if you take the credit. :-)
APA> (flet ((append-message
APA> (&rest args) ())
APA> (clear-message
APA> (&optional label frame stdout-p no-restore)
APA> ()))
APA> (insert "\n\nLoad-Path Lisp Shadows:\n"
APA> "----------------------\n")
APA> (let ((before-shadows (point)))
APA> (insert
APA> (format "%s"
APA> (find-emacs-lisp-shadows load-path)))
APA> (save-restriction
APA> (narrow-to-region before-shadows (point))
APA> (fill-paragraph t)
APA> (insert "\n"))))
Adrian, this is fantastic. Thanks ever so much!
APA> (defun find-emacs-lisp-shadows (&optional path)
APA> in shadow.el does not have an autoload cookie.
APA> Does it deserve one?
IMO, no. Because most people wouldn't use it anyway, they'd be using
'list-load-path-shadows' instead. The only reason I used it in
xemacsbug.el was because it was easier to redirect its output to the
mail buffer.
APA> Above code currently needs a (require 'shadow) to work.
Yep.
--
|---<Steve Youngs>---------------<GnuPG KeyID: 9E7E2820>---|
| XEmacs - It's not just an editor. |
| It's a way of life. |
|------------------------------------<youngs(a)xemacs.org>---|