Mercurial > emacs
diff lisp/emulation/viper-cmd.el @ 93773:d7554c14325c
2008-04-06 Michael Kifer <kifer@cs.stonybrook.edu>
* viper*.el (viper-search-wrap-around-t): replace with
viper-search-wrap-around.
* ediff*.el: replace 3-argument 'require' statements with 1-argument
ones (wrapped in if's). For compatibility with the current stable
version of XEmacs.
| author | Michael Kifer <kifer@cs.stonybrook.edu> |
|---|---|
| date | Sun, 06 Apr 2008 19:26:02 +0000 |
| parents | 34417c118a39 |
| children | eb7b2376cae5 |
line wrap: on
line diff
--- a/lisp/emulation/viper-cmd.el Sun Apr 06 17:30:40 2008 +0000 +++ b/lisp/emulation/viper-cmd.el Sun Apr 06 19:26:02 2008 +0000 @@ -3898,7 +3898,7 @@ (if (not (equal start-point (point))) (push-mark start-point t))) (search-failed - (if (and (not fail-if-not-found) viper-search-wrap-around-t) + (if (and (not fail-if-not-found) viper-search-wrap-around) (progn (message "Search wrapped around BOTTOM of buffer") (goto-char (point-min)) @@ -3927,7 +3927,7 @@ (if (not (equal start-point (point))) (push-mark start-point t))) (search-failed - (if (and (not fail-if-not-found) viper-search-wrap-around-t) + (if (and (not fail-if-not-found) viper-search-wrap-around) (progn (message "Search wrapped around TOP of buffer") (goto-char (point-max)) @@ -4775,7 +4775,7 @@ (setq viper-no-multiple-ESC t viper-re-search t viper-vi-style-in-minibuffer t - viper-search-wrap-around-t t + viper-search-wrap-around t viper-electric-mode nil viper-want-emacs-keys-in-vi nil viper-want-emacs-keys-in-insert nil))