Mercurial > hg > xemacs-beta
comparison lisp/x11/x-menubar.el @ 88:821dec489c24 r20-0
Import from CVS: tag r20-0
author | cvs |
---|---|
date | Mon, 13 Aug 2007 09:09:59 +0200 |
parents | 364816949b59 |
children | 0d2f883870bc |
comparison
equal
deleted
inserted
replaced
87:7df2982f5c17 | 88:821dec489c24 |
---|---|
601 nil ; the partition: menus after this are flushright | 601 nil ; the partition: menus after this are flushright |
602 | 602 |
603 ("Help" | 603 ("Help" |
604 ["About XEmacs..." about-xemacs t] | 604 ["About XEmacs..." about-xemacs t] |
605 ("Basics" | 605 ("Basics" |
606 ["XEmacs Tutorial" help-with-tutorial t] | 606 ["Tutorial" help-with-tutorial t] |
607 ["XEmacs News" view-emacs-news t] | 607 ["News" view-emacs-news t] |
608 ["Package Browser" finder-by-keyword t] | 608 ["Packages" finder-by-keyword t] |
609 ["Splash Screen" xemacs-splash-buffer t]) | 609 ["Splash" xemacs-splash-buffer t]) |
610 "-----" | 610 "-----" |
611 ("XEmacs FAQ" | 611 ("XEmacs FAQ" |
612 ["XEmacs FAQ (local)" xemacs-local-faq t] | 612 ["FAQ" xemacs-local-faq t] |
613 ["Newest XEmacs FAQ via WWW" xemacs-www-faq t] | 613 ["FAQ via WWW" xemacs-www-faq t] |
614 ["XEmacs WWW Page" xemacs-www-page t]) | 614 ["Home Page" xemacs-www-page t]) |
615 ("Samples" | 615 ("Samples" |
616 ["Sample" (find-file | 616 ["Sample" (find-file |
617 (expand-file-name "sample.emacs" | 617 (expand-file-name "sample.emacs" |
618 data-directory)) | 618 data-directory)) |
619 t ".emacs"] | 619 t ".emacs"] |
625 (expand-file-name "enriched.doc" | 625 (expand-file-name "enriched.doc" |
626 data-directory)) | 626 data-directory)) |
627 t "enriched"]) | 627 t "enriched"]) |
628 "-----" | 628 "-----" |
629 ("Lookup in Info" | 629 ("Lookup in Info" |
630 ["Key/Mouse Binding..." Info-goto-emacs-key-command-node t] | 630 ["Key Binding..." Info-goto-emacs-key-command-node t] |
631 ["Command..." Info-goto-emacs-command-node t] | 631 ["Command..." Info-goto-emacs-command-node t] |
632 ["Elisp Function..." Info-elisp-ref t] | 632 ["Function..." Info-elisp-ref t] |
633 ["Topic..." Info-query t]) | 633 ["Topic..." Info-query t]) |
634 ("Manuals" | 634 ("Manuals" |
635 ["Info (Detailed Docs)" info t] | 635 ["Info" info t] |
636 ["Unix Manual..." manual-entry t]) | 636 ["Unix Manual..." manual-entry t]) |
637 ("Commands & Keys" | 637 ("Commands & Keys" |
638 ["Describe Mode" describe-mode t] | 638 ["Mode" describe-mode t] |
639 ["Apropos..." hyper-apropos t] | 639 ["Apropos..." hyper-apropos t] |
640 ["Apropos Documentation..." apropos-documentation t] | 640 ["Apropos Docs..." apropos-documentation t] |
641 "-----" | 641 "-----" |
642 ["Describe Key/Mouse..." describe-key t] | 642 ["Key..." describe-key t] |
643 ["List Key Bindings" describe-bindings t] | 643 ["Bindings" describe-bindings t] |
644 ["List Mouse Bindings" describe-pointer t] | 644 ["Mouse Bindings" describe-pointer t] |
645 ["Recent Keystrokes" view-lossage t] | 645 ["Recent Keys" view-lossage t] |
646 "-----" | 646 "-----" |
647 ["Describe Function..." describe-function t] | 647 ["Function..." describe-function t] |
648 ["Describe Variable..." describe-variable t] | 648 ["Variable..." describe-variable t] |
649 ["Where Is Command..." where-is t]) | 649 ["Locate Command..." where-is t]) |
650 "-----" | 650 "-----" |
651 ["Recent Messages" view-lossage t] | 651 ["Recent Messages" view-lossage t] |
652 ("Misc" | 652 ("Misc" |
653 ["Describe No Warranty" describe-no-warranty t] | 653 ["No Warranty" describe-no-warranty t] |
654 ["Describe XEmacs License" describe-copying t] | 654 ["XEmacs License" describe-copying t] |
655 ["Getting the Latest Version" describe-distribution t]) | 655 ["The Latest Version" describe-distribution t]) |
656 ) | 656 ) |
657 ))) | 657 ))) |
658 | 658 |
659 | 659 |
660 (defun maybe-add-init-button () | 660 (defun maybe-add-init-button () |