diff options
| author | Karl Heuer | 1995-05-22 21:42:13 +0000 |
|---|---|---|
| committer | Karl Heuer | 1995-05-22 21:42:13 +0000 |
| commit | 98e05fae58f00a6cdf18e2185909e38cf0457fc0 (patch) | |
| tree | 6c4b01a6a5906612b2f2ea0f70fc057f7c521b43 | |
| parent | a142f21b7d4b0ea885ff5d5d77ae4b69f6044d2f (diff) | |
| download | emacs-98e05fae58f00a6cdf18e2185909e38cf0457fc0.tar.gz emacs-98e05fae58f00a6cdf18e2185909e38cf0457fc0.zip | |
(ada-add-ada-menu): Fix args to easy-menu-define.
| -rw-r--r-- | lisp/progmodes/ada-mode.el | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/lisp/progmodes/ada-mode.el b/lisp/progmodes/ada-mode.el index f7077ad426f..740dcd1ca97 100644 --- a/lisp/progmodes/ada-mode.el +++ b/lisp/progmodes/ada-mode.el | |||
| @@ -108,11 +108,11 @@ | |||
| 108 | ;;; LCD Archive Entry: | 108 | ;;; LCD Archive Entry: |
| 109 | ;;; ada-mode|Rolf Ebert|<ebert@inf.enst.fr> | 109 | ;;; ada-mode|Rolf Ebert|<ebert@inf.enst.fr> |
| 110 | ;;; |Major-mode for Ada | 110 | ;;; |Major-mode for Ada |
| 111 | ;;; |$Date: 1995/04/04 03:00:59 $|$Revision: 1.4 $| | 111 | ;;; |$Date: 1995/04/07 00:14:59 $|$Revision: 1.5 $| |
| 112 | 112 | ||
| 113 | 113 | ||
| 114 | (defconst ada-mode-version (substring "$Revision: 1.4 $" 11 -2) | 114 | (defconst ada-mode-version (substring "$Revision: 1.5 $" 11 -2) |
| 115 | "$Id: ada-mode.el,v 1.4 1995/04/04 03:00:59 kwzh Exp kwzh $ | 115 | "$Id: ada-mode.el,v 1.5 1995/04/07 00:14:59 kwzh Exp kwzh $ |
| 116 | 116 | ||
| 117 | Report bugs to: Rolf Ebert <ebert@inf.enst.fr>") | 117 | Report bugs to: Rolf Ebert <ebert@inf.enst.fr>") |
| 118 | 118 | ||
| @@ -3436,7 +3436,7 @@ Searches through former 'with' statements for possible completions." | |||
| 3436 | 3436 | ||
| 3437 | (defun ada-add-ada-menu () | 3437 | (defun ada-add-ada-menu () |
| 3438 | "Adds the menu 'Ada' to the menu-bar in Ada Mode." | 3438 | "Adds the menu 'Ada' to the menu-bar in Ada Mode." |
| 3439 | (easy-menu-define t ada-mode-map t | 3439 | (easy-menu-define ada-mode-menu ada-mode-map "Menu keymap for Ada mode." |
| 3440 | '("Ada" | 3440 | '("Ada" |
| 3441 | ["next package" ada-next-package t] | 3441 | ["next package" ada-next-package t] |
| 3442 | ["previous package" ada-previous-package t] | 3442 | ["previous package" ada-previous-package t] |