Michael> Take popup-dialog-box for example. If there was a good Michael> example of how to use it, it would be simple to use, but Michael> right now it you must have knowledge of the way many Michael> other aspects of XEmacs LISP works to use the help. Trivial example: ;; Bo Derek ruined my life! (defvar yow-is-up nil "Is the yow popup showing?") (defun yow-popdown () (interactive) (setq yow-is-up nil) nil) (defun yow-popup () (interactive) (if (not yow-is-up) (progn (popup-dialog-box `(,(yow) [ "Ok" yow-popdown t ])) (setq yow-is-up t)))) -- Alexander Burchell Wilshire Associates aburchel(a)wilshire.com (310) 899-2303