# HG changeset patch
# User Dave Love <fx@gnu.org>
# Date 979058091 0
# Node ID fcdd43bc1c3354bfc3e83e05bbb4139889720803
# Parent  62f469e476eb041769a242204d0986e46213aa61
(ada-popup-key): Fix :type.

diff -r 62f469e476eb -r fcdd43bc1c33 lisp/progmodes/ada-mode.el
--- a/lisp/progmodes/ada-mode.el	Tue Jan 09 15:25:35 2001 +0000
+++ b/lisp/progmodes/ada-mode.el	Tue Jan 09 16:34:51 2001 +0000
@@ -6,7 +6,7 @@
 ;;      Markus Heritsch <Markus.Heritsch@studbox.uni-stuttgart.de>
 ;;      Emmanuel Briot  <briot@gnat.com>
 ;; Maintainer: Emmanuel Briot <briot@gnat.com>
-;; Ada Core Technologies's version:   $Revision: 1.35 $
+;; Ada Core Technologies's version:   $Revision: 1.36 $
 ;; Keywords: languages ada
 
 ;; This file is not part of GNU Emacs
@@ -311,7 +311,7 @@
 (defcustom ada-popup-key '[down-mouse-3]
   "*Key used for binding the contextual menu.
 If nil, no contextual menu is available."
-  :type 'string :group 'ada)
+  :type '(choice vector string) :group 'ada)
 
 (defcustom ada-search-directories
   '("." "$ADA_INCLUDE_PATH" "/usr/adainclude" "/usr/local/adainclude"