# HG changeset patch
# User Johan Vromans <jvromans@squirrel.nl>
# Date 803486603 0
# Node ID eaff09164eaeb6b585f88226696b3f812eec4c63
# Parent  6d99dc5117e3479c190c3f06daf385d0f669ba6b
Withdraw mouse-major-mode-map modifications.
They were erroneous and not needed.

diff -r 6d99dc5117e3 -r eaff09164eae lisp/forms.el
--- a/lisp/forms.el	Sun Jun 18 13:42:43 1995 +0000
+++ b/lisp/forms.el	Sun Jun 18 14:43:23 1995 +0000
@@ -282,10 +282,10 @@
 (provide 'forms)			;;; official
 (provide 'forms-mode)			;;; for compatibility
 
-(defconst forms-version (substring "$Revision: 2.16 $" 11 -2)
+(defconst forms-version (substring "$Revision: 2.17 $" 11 -2)
   "The version number of forms-mode (as string).  The complete RCS id is:
 
-  $Id: forms.el,v 2.16 1995/05/30 22:54:53 kwzh Exp rms $")
+  $Id: forms.el,v 2.17 1995/06/17 13:00:22 rms Exp jvromans $")
 
 (defvar forms-mode-hooks nil
   "Hook functions to be run upon entering Forms mode.")
@@ -1308,7 +1308,6 @@
     '("Next Field" . forms-next-field))
   (put 'forms-insert-record 'menu-enable '(not forms-read-only))
   (put 'forms-delete-record 'menu-enable '(not forms-read-only))
-  (setq mouse-major-mode-menu map)
 )
 (defun forms--mode-menu-edit (map)
 ;;; Menu initialisation
@@ -1355,7 +1354,6 @@
     '("Next Field" . forms-next-field))
   (put 'forms-insert-record 'menu-enable '(not forms-read-only))
   (put 'forms-delete-record 'menu-enable '(not forms-read-only))
-  (setq mouse-major-mode-menu map)
 )
 
 (defun forms--mode-commands1 (map)