diff options
| author | Karl Heuer | 1996-01-04 23:51:47 +0000 |
|---|---|---|
| committer | Karl Heuer | 1996-01-04 23:51:47 +0000 |
| commit | 7231c3d5285c202de81c516abb6b8d97da9ae244 (patch) | |
| tree | b69c61be6896dbc52fc2da3e24e5f5b64c07b44c | |
| parent | f7eee6c6dde01d575a7efc3ba35e45024f5abd12 (diff) | |
| download | emacs-7231c3d5285c202de81c516abb6b8d97da9ae244.tar.gz emacs-7231c3d5285c202de81c516abb6b8d97da9ae244.zip | |
(vip-shift-width): Doc fix.
| -rw-r--r-- | lisp/emulation/vip.el | 4 |
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 @@ | |||
| 70 | re-execute last destructive command") | 70 | re-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) |