Mercurial > hg > xemacs-beta

diff lisp/emulators/tpu-edt.el @ 74:54cc21c15cbb r20-0b32

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r20-0b32
author cvs
date Mon, 13 Aug 2007 09:04:33 +0200
parents b9518feda344
children 34a5b81f86ba
line wrap: on
line diff
--- a/lisp/emulators/tpu-edt.el	Mon Aug 13 09:03:47 2007 +0200
+++ b/lisp/emulators/tpu-edt.el	Mon Aug 13 09:04:33 2007 +0200
@@ -215,8 +215,8 @@
 ;;    ; Repeat the preceding mappings for X-windows.
 ;;    (cond
 ;;     (window-system
-;;      (global-set-key [kp_7] 'tpu-paragraph)                   ; KP7
-;;      (define-key GOLD-map [kp_f1] 'universal-argument)))      ; GOLD-PF1
+;;      (global-set-key [kp-7] 'tpu-paragraph)                   ; KP7
+;;      (define-key GOLD-map [kp-f1] 'universal-argument)))      ; GOLD-PF1
 
 ;;    ; Display the TPU-edt version.
 ;;    (tpu-version)
@@ -2250,7 +2250,7 @@
 
 
 ;;;
-;;;  Minibuffer map additions to make KP_enter = RET
+;;;  Minibuffer map additions to make KP-enter = RET
 ;;;
 (define-key minibuffer-local-map "\eOM" 'exit-minibuffer)
 (define-key minibuffer-local-ns-map "\eOM" 'exit-minibuffer)