Mercurial > emacs
comparison lisp/emulation/keypad.el @ 59996:aac0a33f5772
Change release version from 21.4 to 22.1 throughout.
Change development version from 21.3.50 to 22.0.50.
author | Kim F. Storm <storm@cua.dk> |
---|---|
date | Wed, 09 Feb 2005 15:50:47 +0000 |
parents | 695cf19ef79e |
children | 18a818a2ee7c 3ebd9bdb4fe5 |
comparison
equal
deleted
inserted
replaced
59995:8f4938738427 | 59996:aac0a33f5772 |
---|---|
106 :set (lambda (symbol value) | 106 :set (lambda (symbol value) |
107 (if value | 107 (if value |
108 (keypad-setup value nil nil value))) | 108 (keypad-setup value nil nil value))) |
109 :initialize 'custom-initialize-default | 109 :initialize 'custom-initialize-default |
110 :link '(emacs-commentary-link "keypad.el") | 110 :link '(emacs-commentary-link "keypad.el") |
111 :version "21.4" | 111 :version "22.1" |
112 :type '(choice (const :tag "Plain numeric keypad" numeric) | 112 :type '(choice (const :tag "Plain numeric keypad" numeric) |
113 (character :tag "Numeric Keypad with Decimal Key" | 113 (character :tag "Numeric Keypad with Decimal Key" |
114 :match (lambda (widget value) (integerp value)) | 114 :match (lambda (widget value) (integerp value)) |
115 :value ?.) | 115 :value ?.) |
116 (const :tag "Numeric prefix arguments" prefix) | 116 (const :tag "Numeric prefix arguments" prefix) |
129 :set (lambda (symbol value) | 129 :set (lambda (symbol value) |
130 (if value | 130 (if value |
131 (keypad-setup value t nil value))) | 131 (keypad-setup value t nil value))) |
132 :initialize 'custom-initialize-default | 132 :initialize 'custom-initialize-default |
133 :link '(emacs-commentary-link "keypad.el") | 133 :link '(emacs-commentary-link "keypad.el") |
134 :version "21.4" | 134 :version "22.1" |
135 :type '(choice (const :tag "Plain numeric keypad" numeric) | 135 :type '(choice (const :tag "Plain numeric keypad" numeric) |
136 (character :tag "Numeric Keypad with Decimal Key" | 136 (character :tag "Numeric Keypad with Decimal Key" |
137 :match (lambda (widget value) (integerp value)) | 137 :match (lambda (widget value) (integerp value)) |
138 :value ?.) | 138 :value ?.) |
139 (const :tag "Numeric prefix arguments" prefix) | 139 (const :tag "Numeric prefix arguments" prefix) |
152 :set (lambda (symbol value) | 152 :set (lambda (symbol value) |
153 (if value | 153 (if value |
154 (keypad-setup value nil t value))) | 154 (keypad-setup value nil t value))) |
155 :initialize 'custom-initialize-default | 155 :initialize 'custom-initialize-default |
156 :link '(emacs-commentary-link "keypad.el") | 156 :link '(emacs-commentary-link "keypad.el") |
157 :version "21.4" | 157 :version "22.1" |
158 :type '(choice (const :tag "Plain numeric keypad" numeric) | 158 :type '(choice (const :tag "Plain numeric keypad" numeric) |
159 (character :tag "Numeric Keypad with Decimal Key" | 159 (character :tag "Numeric Keypad with Decimal Key" |
160 :match (lambda (widget value) (integerp value)) | 160 :match (lambda (widget value) (integerp value)) |
161 :value ?.) | 161 :value ?.) |
162 (const :tag "Numeric prefix arguments" prefix) | 162 (const :tag "Numeric prefix arguments" prefix) |
175 :set (lambda (symbol value) | 175 :set (lambda (symbol value) |
176 (if value | 176 (if value |
177 (keypad-setup value t t value))) | 177 (keypad-setup value t t value))) |
178 :initialize 'custom-initialize-default | 178 :initialize 'custom-initialize-default |
179 :link '(emacs-commentary-link "keypad.el") | 179 :link '(emacs-commentary-link "keypad.el") |
180 :version "21.4" | 180 :version "22.1" |
181 :type '(choice (const :tag "Plain numeric keypad" numeric) | 181 :type '(choice (const :tag "Plain numeric keypad" numeric) |
182 (character :tag "Numeric Keypad with Decimal Key" | 182 (character :tag "Numeric Keypad with Decimal Key" |
183 :match (lambda (widget value) (integerp value)) | 183 :match (lambda (widget value) (integerp value)) |
184 :value ?.) | 184 :value ?.) |
185 (const :tag "Numeric prefix arguments" prefix) | 185 (const :tag "Numeric prefix arguments" prefix) |