Re: Help Menu

Changes look good, Stephen. I notice that Current Installation Info and Send Bug Report don't have the keystrokes to invoke them after their menu items, is that because these are not bound to keys? If they are bound to keys by default, I was going to suggest they be added there. Also, 4th item down, "Info (Online Docs)" doesn't seem to go on the internet to find the Info files, why does it have "online" in the name? Do they mean online in some other sense? One other observation about the help menu too: I have complained about the documentation in the past, and about half the time, the information is truly there, I just cannot find it when I am trying to look something up. The help menu seems to be segmented by which thing you want to search in (which files) and also the type of thing you want to search for (if it is a command or key...). That is, you can search for commands, keys, info files, or the user manual, or the lisp reference, etc. Emacs is similar in this regard on their help menu. What I have been wanting is a global XEmacs search that would all of the info files, and all the package info files, and all the other manuals at the same time, and give me an exhaustive list of results, results that would look like, on each line, a link to the file name that was searched, and a phrase around the word(s) searched for. If this exists already, somebody please tell me how to access it (and let's put it on the help menu). Or if there are reasons it won't work, please educate me. I started trying to use a form with widgets to choose what to search, and got this far, but need to learn the glue to make widgets work to do things after displaying them: ---------------------------------- (require 'widget) (eval-when-compile (require 'wid-edit)) (defvar widget-example-repeat) (defun widget-example () "Create the widgets for a global XEmacs search." (interactive) (kill-buffer (get-buffer-create "*Search Widget Example*")) (switch-to-buffer (get-buffer-create "*Search Widget Example*")) (kill-all-local-variables) (make-local-variable 'widget-example-repeat) (widget-insert "**** Choose files to search: ****\n\n") (widget-insert "Select multiple:\n\n") (widget-create 'checkbox t) (widget-insert " All XEmacs program info files\n ") (widget-create 'checkbox t) (widget-insert " Getting Started With XEmacs\n ") (widget-create 'checkbox t) (widget-insert " Xemacs User's Manual\n ") (widget-create 'checkbox t) (widget-insert " XEmacs Lisp Reference Manual\n ") (widget-create 'checkbox t) (widget-insert " XEmacs Internals Manual\n ") (widget-create 'checkbox t) (widget-insert " All XEmacs Packages\n\n") (widget-create 'checkbox t) (widget-insert " All XEmacs Packages Info Files\n\n") (widget-create 'checkbox ) (widget-insert " All XEmacs Source code\n ") (widget-create 'editable-field :size 55 :format "Path: %v " " /usr/src/xemacs-21.5.31" ) (widget-insert "\n") (widget-create 'checkbox ) (widget-insert " Personal Project Directory\n ") (widget-create 'editable-field :size 55 :format "Path: %v " " /home/steve/xemacs_macros") (widget-insert "\n\n ") (widget-create 'push-button :notify (lambda ( &rest ignore) (message "Starting Search...")) "Start Search") (widget-insert "\n\n\n ") (widget-create 'push-button :notify (lambda (widget &rest ignore) (message "Saving Search Settings")) "Save Settings") (widget-insert "\n\n ") (widget-create 'push-button :notify (lambda ( &rest ignore) (widget-example)) "Restore Settings") (widget-insert "\n") (use-local-map widget-keymap) (widget-setup)) ---------------------------------- If anyone can offer suggestions or point me to examples of using forms, I'd welcome it. Steve _______________________________________________ XEmacs-Beta mailing list XEmacs-Beta(a)xemacs.org http://lists.xemacs.org/mailman/listinfo/xemacs-beta