From f7eee6c6dde01d575a7efc3ba35e45024f5abd12 Mon Sep 17 00:00:00 2001 From: Karl Heuer Date: Thu, 4 Jan 1996 23:51:12 +0000 Subject: [PATCH] (GOLD-map, GOLD-CSI-map, GOLD-SS3-map, tpu-set-mark): Doc fix. --- lisp/emulation/tpu-edt.el | 10 +++++----- 1 file changed, 5 insertions(+), 5 deletions(-) diff --git a/lisp/emulation/tpu-edt.el b/lisp/emulation/tpu-edt.el index 59abca4a5d2..bafc098d8ec 100644 --- a/lisp/emulation/tpu-edt.el +++ b/lisp/emulation/tpu-edt.el @@ -316,14 +316,14 @@ CSI is DEC's name for the sequence [.") SS3 is DEC's name for the sequence O.") (defvar GOLD-map (make-keymap) - "Maps the function keys on the VT100 keyboard preceeded by PF1. + "Maps the function keys on the VT100 keyboard preceded by PF1. GOLD is the ASCII 7-bit escape sequence OP.") (defvar GOLD-CSI-map (make-sparse-keymap) - "Maps the function keys on the VT100 keyboard preceeded by GOLD-CSI.") + "Maps the function keys on the VT100 keyboard preceded by GOLD-CSI.") (defvar GOLD-SS3-map (make-sparse-keymap) - "Maps the function keys on the VT100 keyboard preceeded by GOLD-SS3.") + "Maps the function keys on the VT100 keyboard preceded by GOLD-SS3.") (defvar tpu-global-map nil "TPU-edt global keymap.") (defvar tpu-original-global-map (copy-keymap global-map) @@ -543,7 +543,7 @@ version of Emacs." (defun tpu-set-mark (pos) "TPU-edt verion of the `set-mark' function. -Sets the mark at POS and activates the region acording to the +Sets the mark at POS and activates the region according to the current version of Emacs." (set-mark pos) (and tpu-lucid-emacs19-p pos (zmacs-activate-region))) @@ -1203,7 +1203,7 @@ direction. If an argument is specified, don't set the search direction." (defun tpu-check-search-case (string) "Returns t if string contains upper case." - ;; if using regexp, elimiate upper case forms (\B \W \S.) + ;; if using regexp, eliminate upper case forms (\B \W \S.) (if tpu-regexp-p (let ((pat (copy-sequence string)) (case-fold-search nil) (pos 0)) (while (setq pos (string-match "\\\\\\\\" pat)) (aset pat (+ 1 pos) ?.)) -- 2.39.2