/[emacs]/emacs/lisp/emulation/keypad.el
ViewVC logotype

Diff of /emacs/lisp/emulation/keypad.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.6 by lektu, Tue Feb 4 12:56:02 2003 UTC revision 1.6.6.1 by fx, Wed Sep 10 17:52:28 2003 UTC
# Line 233  the decimal key on the keypad is mapped Line 233  the decimal key on the keypad is mapped
233           (bind           (bind
234            (cond            (cond
235             ((or (eq setup 'numeric)             ((or (eq setup 'numeric)
236                  (char-valid-p setup))                  (characterp setup))
237              (if (eq decimal 'numeric)              (if (eq decimal 'numeric)
238                  (setq decimal nil))                  (setq decimal nil))
239              (vector (or decimal ?.) ?0 ?1 ?2 ?3 ?4 ?5 ?6 ?7 ?8 ?9))              (vector (or decimal ?.) ?0 ?1 ?2 ?3 ?4 ?5 ?6 ?7 ?8 ?9))

Legend:
Removed from v.1.6  
changed lines
  Added in v.1.6.6.1

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26