aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorKarl Heuer1996-01-04 23:51:47 +0000
committerKarl Heuer1996-01-04 23:51:47 +0000
commit7231c3d5285c202de81c516abb6b8d97da9ae244 (patch)
treeb69c61be6896dbc52fc2da3e24e5f5b64c07b44c
parentf7eee6c6dde01d575a7efc3ba35e45024f5abd12 (diff)
downloademacs-7231c3d5285c202de81c516abb6b8d97da9ae244.tar.gz
emacs-7231c3d5285c202de81c516abb6b8d97da9ae244.zip
(vip-shift-width): Doc fix.
-rw-r--r--lisp/emulation/vip.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/emulation/vip.el b/lisp/emulation/vip.el
index 12c7bd4945c..fb5434fae32 100644
--- a/lisp/emulation/vip.el
+++ b/lisp/emulation/vip.el
@@ -70,7 +70,7 @@
70re-execute last destructive command") 70re-execute last destructive command")
71 71
72(defconst vip-shift-width 8 72(defconst vip-shift-width 8
73 "*The number of colums shifted by > and < command.") 73 "*The number of columns shifted by > and < command.")
74 74
75(defconst vip-re-replace nil 75(defconst vip-re-replace nil
76 "*If t then do regexp replace, if nil then do string replace.") 76 "*If t then do regexp replace, if nil then do string replace.")
@@ -396,7 +396,7 @@ obtained so far, and COM is the command part obtained so far."
396 (setq unread-command-events (list char))) 396 (setq unread-command-events (list char)))
397 ;; as com is non-nil, this means that we have a command to execute 397 ;; as com is non-nil, this means that we have a command to execute
398 (if (or (= (car com) ?r) (= (car com) ?R)) 398 (if (or (= (car com) ?r) (= (car com) ?R))
399 ;; execute apropriate region command. 399 ;; execute appropriate region command.
400 (let ((char (car com)) (com (cdr com))) 400 (let ((char (car com)) (com (cdr com)))
401 (setq prefix-arg (cons value com)) 401 (setq prefix-arg (cons value com))
402 (if (= char ?r) (vip-region prefix-arg) 402 (if (= char ?r) (vip-region prefix-arg)