From: Kim F. Storm <storm@cua.dk>
Date: Sat, 14 Sep 2002 20:54:07 +0000 (+0000)
Subject: (keypad-setup, keypad-shifted-setup)
X-Git-Tag: ttn-vms-21-2-B4~13166
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=f31023f9902b6d5310346905da47dfbc81bb5ffa;p=emacs.git

(keypad-setup, keypad-shifted-setup)
(keypad-numlock-setup, keypad-numlock-shifted-setup):
Change `Remove Binding' option to `Unspecified/User-defined'.
(keypad-setup): Enhance explanation of setup type `none'.
---

diff --git a/lisp/emulation/keypad.el b/lisp/emulation/keypad.el
index f9b73f4f1d7..c638409613f 100644
--- a/lisp/emulation/keypad.el
+++ b/lisp/emulation/keypad.el
@@ -116,7 +116,7 @@ decimal key must be specified."
 		 (const :tag "Numeric prefix arguments" prefix) 
 		 (const :tag "Cursor keys" cursor)
 		 (const :tag "Shifted cursor keys" S-cursor)
-		 (const :tag "Remove bindings" none)
+		 (const :tag "Unspecified/User-defined" none)
 		 (other :tag "Keep existing bindings" nil))
   :require 'keypad
   :group 'keyboard)
@@ -139,7 +139,7 @@ decimal key must be specified."
 		 (const :tag "Numeric prefix arguments" prefix) 
 		 (const :tag "Cursor keys" cursor)
 		 (const :tag "Shifted cursor keys" S-cursor)
-		 (const :tag "Remove bindings" none)
+		 (const :tag "Unspecified/User-defined" none)
 		 (other :tag "Keep existing bindings" nil))
   :require 'keypad
   :group 'keyboard)
@@ -162,7 +162,7 @@ decimal key must be specified."
 		 (const :tag "Numeric prefix arguments" prefix) 
 		 (const :tag "Cursor keys" cursor)
 		 (const :tag "Shifted cursor keys" S-cursor)
-		 (const :tag "Remove bindings" none)
+		 (const :tag "Unspecified/User-defined" none)
 		 (other :tag "Keep existing bindings" nil))
   :require 'keypad
   :group 'keyboard)
@@ -185,7 +185,7 @@ decimal key must be specified."
 		 (const :tag "Numeric prefix arguments" prefix) 
 		 (const :tag "Cursor keys" cursor)
 		 (const :tag "Shifted cursor keys" S-cursor)
-		 (const :tag "Remove bindings" none)
+		 (const :tag "Unspecified/User-defined" none)
 		 (other :tag "Keep existing bindings" nil))
   :require 'keypad
   :group 'keyboard)
@@ -205,7 +205,9 @@ keys are bound.
  'S-cursor Bind shifted keypad keys to the shifted cursor movement keys.
  'cursor   Bind keypad keys to the cursor movement keys.
  'numeric  Plain numeric keypad, i.e. 0 .. 9 and .  (or DECIMAL arg)
- 'none     Removes all bindings for keypad keys in function-key-map.
+ 'none     Removes all bindings for keypad keys in function-key-map;
+           this enables any user-defined bindings for the keypad keys
+           in the global and local keymaps.
 
 If SETUP is 'numeric and the optional fourth argument DECIMAL is non-nil,
 the decimal key on the keypad is mapped to DECIMAL instead of `.'"