comparison lisp/menubar-items.el @ 824:0cce4fee510b

[xemacs-hg @ 2002-05-01 08:25:40 by youngs] 2002-05-01 Steve Youngs <youngs@xemacs.org> * package-get.el (package-get-update-base-entry): Remove code to add package entries into custom. (package-get-custom-groups): Remove. (package-get-custom): Ditto. (package-get-custom-add-entry): Ditto. 2002-04-29 Steve Youngs <youngs@xemacs.org> * menubar-items.el (default-menubar): Remove entry for managing packages via custom. 2002-05-01 Steve Youngs <youngs@xemacs.org> * xemacs/packages.texi (Automatically): Don't mention "Options" menu. (Installing Packages): Don't mention getting list of packages via customize.
author youngs
date Wed, 01 May 2002 08:25:52 +0000
parents a634e3b7acc8
children bf645ed7cfe3
comparison
equal deleted inserted replaced
823:4f043f6069e3 824:0cce4fee510b
574 (submenu-generate-accelerator-spec 574 (submenu-generate-accelerator-spec
575 (package-get-download-menu)))) 575 (package-get-download-menu))))
576 ["%_Update Package Index" package-get-update-base] 576 ["%_Update Package Index" package-get-update-base]
577 ["%_List and Install" pui-list-packages] 577 ["%_List and Install" pui-list-packages]
578 ["U%_pdate Installed Packages" package-get-update-all] 578 ["U%_pdate Installed Packages" package-get-update-all]
579 ;; hack-o-matic, we can't force a load of package-base here
580 ;; since it triggers dialog box interactions which we can't
581 ;; deal with while using a menu
582 ("Using %_Custom"
583 :filter (lambda (&rest junk)
584 (if package-get-base
585 (submenu-generate-accelerator-spec
586 (cdr (custom-menu-create 'packages)))
587 '("Please load Package Index"))))
588
589 ["%_Help" (Info-goto-node "(xemacs)Packages")]) 579 ["%_Help" (Info-goto-node "(xemacs)Packages")])
590 ("%_Internet" 580 ("%_Internet"
591 ["Read Mail %_1 (VM)..." vm 581 ["Read Mail %_1 (VM)..." vm
592 :active (fboundp 'vm)] 582 :active (fboundp 'vm)]
593 ["Read Mail %_2 (MH)..." (mh-rmail t) 583 ["Read Mail %_2 (MH)..." (mh-rmail t)