diff options
| author | Kim F. Storm | 2002-09-14 20:54:07 +0000 |
|---|---|---|
| committer | Kim F. Storm | 2002-09-14 20:54:07 +0000 |
| commit | f31023f9902b6d5310346905da47dfbc81bb5ffa (patch) | |
| tree | 87aaac39e1dfbbe40dcc99ef66d95a460e3d523f | |
| parent | d83b86d85f4125c3da6a61415d70e760b2930f00 (diff) | |
| download | emacs-f31023f9902b6d5310346905da47dfbc81bb5ffa.tar.gz emacs-f31023f9902b6d5310346905da47dfbc81bb5ffa.zip | |
(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'.
| -rw-r--r-- | lisp/emulation/keypad.el | 12 |
1 files changed, 7 insertions, 5 deletions
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." | |||
| 116 | (const :tag "Numeric prefix arguments" prefix) | 116 | (const :tag "Numeric prefix arguments" prefix) |
| 117 | (const :tag "Cursor keys" cursor) | 117 | (const :tag "Cursor keys" cursor) |
| 118 | (const :tag "Shifted cursor keys" S-cursor) | 118 | (const :tag "Shifted cursor keys" S-cursor) |
| 119 | (const :tag "Remove bindings" none) | 119 | (const :tag "Unspecified/User-defined" none) |
| 120 | (other :tag "Keep existing bindings" nil)) | 120 | (other :tag "Keep existing bindings" nil)) |
| 121 | :require 'keypad | 121 | :require 'keypad |
| 122 | :group 'keyboard) | 122 | :group 'keyboard) |
| @@ -139,7 +139,7 @@ decimal key must be specified." | |||
| 139 | (const :tag "Numeric prefix arguments" prefix) | 139 | (const :tag "Numeric prefix arguments" prefix) |
| 140 | (const :tag "Cursor keys" cursor) | 140 | (const :tag "Cursor keys" cursor) |
| 141 | (const :tag "Shifted cursor keys" S-cursor) | 141 | (const :tag "Shifted cursor keys" S-cursor) |
| 142 | (const :tag "Remove bindings" none) | 142 | (const :tag "Unspecified/User-defined" none) |
| 143 | (other :tag "Keep existing bindings" nil)) | 143 | (other :tag "Keep existing bindings" nil)) |
| 144 | :require 'keypad | 144 | :require 'keypad |
| 145 | :group 'keyboard) | 145 | :group 'keyboard) |
| @@ -162,7 +162,7 @@ decimal key must be specified." | |||
| 162 | (const :tag "Numeric prefix arguments" prefix) | 162 | (const :tag "Numeric prefix arguments" prefix) |
| 163 | (const :tag "Cursor keys" cursor) | 163 | (const :tag "Cursor keys" cursor) |
| 164 | (const :tag "Shifted cursor keys" S-cursor) | 164 | (const :tag "Shifted cursor keys" S-cursor) |
| 165 | (const :tag "Remove bindings" none) | 165 | (const :tag "Unspecified/User-defined" none) |
| 166 | (other :tag "Keep existing bindings" nil)) | 166 | (other :tag "Keep existing bindings" nil)) |
| 167 | :require 'keypad | 167 | :require 'keypad |
| 168 | :group 'keyboard) | 168 | :group 'keyboard) |
| @@ -185,7 +185,7 @@ decimal key must be specified." | |||
| 185 | (const :tag "Numeric prefix arguments" prefix) | 185 | (const :tag "Numeric prefix arguments" prefix) |
| 186 | (const :tag "Cursor keys" cursor) | 186 | (const :tag "Cursor keys" cursor) |
| 187 | (const :tag "Shifted cursor keys" S-cursor) | 187 | (const :tag "Shifted cursor keys" S-cursor) |
| 188 | (const :tag "Remove bindings" none) | 188 | (const :tag "Unspecified/User-defined" none) |
| 189 | (other :tag "Keep existing bindings" nil)) | 189 | (other :tag "Keep existing bindings" nil)) |
| 190 | :require 'keypad | 190 | :require 'keypad |
| 191 | :group 'keyboard) | 191 | :group 'keyboard) |
| @@ -205,7 +205,9 @@ keys are bound. | |||
| 205 | 'S-cursor Bind shifted keypad keys to the shifted cursor movement keys. | 205 | 'S-cursor Bind shifted keypad keys to the shifted cursor movement keys. |
| 206 | 'cursor Bind keypad keys to the cursor movement keys. | 206 | 'cursor Bind keypad keys to the cursor movement keys. |
| 207 | 'numeric Plain numeric keypad, i.e. 0 .. 9 and . (or DECIMAL arg) | 207 | 'numeric Plain numeric keypad, i.e. 0 .. 9 and . (or DECIMAL arg) |
| 208 | 'none Removes all bindings for keypad keys in function-key-map. | 208 | 'none Removes all bindings for keypad keys in function-key-map; |
| 209 | this enables any user-defined bindings for the keypad keys | ||
| 210 | in the global and local keymaps. | ||
| 209 | 211 | ||
| 210 | If SETUP is 'numeric and the optional fourth argument DECIMAL is non-nil, | 212 | If SETUP is 'numeric and the optional fourth argument DECIMAL is non-nil, |
| 211 | the decimal key on the keypad is mapped to DECIMAL instead of `.'" | 213 | the decimal key on the keypad is mapped to DECIMAL instead of `.'" |