Mercurial > emacs
comparison lisp/menu-bar.el @ 109412:9557b86a556a
Merge from mainline.
author | Katsumi Yamaoka <yamaoka@jpl.org> |
---|---|
date | Sun, 20 Jun 2010 22:46:22 +0000 |
parents | c138aa96dae8 |
children | 2f0720afc474 |
comparison
equal
deleted
inserted
replaced
109411:d654ebf81f14 | 109412:9557b86a556a |
---|---|
701 (setq need-save t)) | 701 (setq need-save t)) |
702 ;; Save if we changed anything. | 702 ;; Save if we changed anything. |
703 (when need-save | 703 (when need-save |
704 (custom-save-all)))) | 704 (custom-save-all)))) |
705 | 705 |
706 (define-key menu-bar-options-menu [package] | |
707 '(menu-item "Manage Emacs Packages" package-list-packages | |
708 :help "Install or uninstall additional Emacs packages")) | |
709 | |
706 (define-key menu-bar-options-menu [save] | 710 (define-key menu-bar-options-menu [save] |
707 `(menu-item ,(purecopy "Save Options") menu-bar-options-save | 711 `(menu-item ,(purecopy "Save Options") menu-bar-options-save |
708 :help ,(purecopy "Save options set from the menu above"))) | 712 :help ,(purecopy "Save options set from the menu above"))) |
709 | 713 |
710 (define-key menu-bar-options-menu [custom-separator] | 714 (define-key menu-bar-options-menu [custom-separator] |