diff options
| author | Richard M. Stallman <rms@gnu.org> | 1994-03-10 04:23:52 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 1994-03-10 04:23:52 +0000 |
| commit | 09113ea2f133e50c001b69deb08530ed669085f9 (patch) | |
| tree | 8278d3502365513246632a97774b82728503a72a /lisp/emerge.el | |
| parent | ad9c7f2b76fa173b341fc02df238e7ad8f113153 (diff) | |
| download | emacs-09113ea2f133e50c001b69deb08530ed669085f9.tar.gz | |
(menu-bar-emerge-menu): Autoload the whole setup.
Diffstat (limited to 'lisp/emerge.el')
| -rw-r--r-- | lisp/emerge.el | 12 |
1 files changed, 9 insertions, 3 deletions
diff --git a/lisp/emerge.el b/lisp/emerge.el index 13f3725036a..297b23d8619 100644 --- a/lisp/emerge.el +++ b/lisp/emerge.el @@ -21,23 +21,29 @@ ;;; Code: -;;;###autoload (autoload 'menu-bar-emerge-map "emerge" nil t 'keymap) - +;;;###autoload (defvar menu-bar-emerge-menu (make-sparse-keymap "menu-bar-emerge-map")) -(fset 'menu-bar-emerge-map (symbol-value 'menu-bar-emerge-map)) +;;;###autoload +(fset 'menu-bar-emerge-menu (symbol-value 'menu-bar-emerge-menu)) +;;;###autoload (define-key menu-bar-emerge-menu [emerge-merge-directories] '("Merge Directories ..." . emerge-merge-directories)) +;;;###autoload (define-key menu-bar-emerge-menu [emerge-revisions-with-ancestor] '("Revisions with Ancestor ..." . emerge-revisions-with-ancestor)) (define-key menu-bar-emerge-menu [emerge-revisions] '("Revisions ..." . emerge-revisions)) +;;;###autoload (define-key menu-bar-emerge-menu [emerge-files-with-ancestor] '("Files with Ancestor ..." . emerge-files-with-ancestor)) +;;;###autoload (define-key menu-bar-emerge-menu [emerge-files] '("Files ..." . emerge-files)) +;;;###autoload (define-key menu-bar-emerge-menu [emerge-buffers-with-ancestor] '("Buffers with Ancestor ..." . emerge-buffers-with-ancestor)) +;;;###autoload (define-key menu-bar-emerge-menu [emerge-buffers] '("Buffers ..." . emerge-buffers)) |