diff options
| author | Karl Heuer | 1996-01-25 01:13:01 +0000 |
|---|---|---|
| committer | Karl Heuer | 1996-01-25 01:13:01 +0000 |
| commit | 4cea11ffadc5a3ea1f79bf6558572d21d51dbb9c (patch) | |
| tree | 006247b7b36d15e7b4d420cf0936418b3cf4b978 | |
| parent | 86fec582331280a585491cf3b1530a0db4ca93a2 (diff) | |
| download | emacs-4cea11ffadc5a3ea1f79bf6558572d21d51dbb9c.tar.gz emacs-4cea11ffadc5a3ea1f79bf6558572d21d51dbb9c.zip | |
(vip-replace-string, vip-search-forward, vip-search-backward): Delete format call inside message.
| -rw-r--r-- | lisp/emulation/vip.el | 18 |
1 files changed, 9 insertions, 9 deletions
diff --git a/lisp/emulation/vip.el b/lisp/emulation/vip.el index e9283fb30a2..8a7f0757b6d 100644 --- a/lisp/emulation/vip.el +++ b/lisp/emulation/vip.el | |||
| @@ -939,9 +939,9 @@ the query replace mode will toggle between string replace and regexp replace." | |||
| 939 | (if (string= str "") | 939 | (if (string= str "") |
| 940 | (progn | 940 | (progn |
| 941 | (setq vip-re-replace (not vip-re-replace)) | 941 | (setq vip-re-replace (not vip-re-replace)) |
| 942 | (message (format "Replace mode changed to %s." | 942 | (message "Replace mode changed to %s." |
| 943 | (if vip-re-replace "regexp replace" | 943 | (if vip-re-replace "regexp replace" |
| 944 | "string replace")))) | 944 | "string replace"))) |
| 945 | (if vip-re-replace | 945 | (if vip-re-replace |
| 946 | ;; (replace-regexp | 946 | ;; (replace-regexp |
| 947 | ;; str | 947 | ;; str |
| @@ -1460,9 +1460,9 @@ giving null search string." | |||
| 1460 | (if (string= vip-s-string "") | 1460 | (if (string= vip-s-string "") |
| 1461 | (progn | 1461 | (progn |
| 1462 | (setq vip-re-search (not vip-re-search)) | 1462 | (setq vip-re-search (not vip-re-search)) |
| 1463 | (message (format "Search mode changed to %s search." | 1463 | (message "Search mode changed to %s search." |
| 1464 | (if vip-re-search "regular expression" | 1464 | (if vip-re-search "regular expression" |
| 1465 | "vanilla")))) | 1465 | "vanilla"))) |
| 1466 | (vip-search vip-s-string t val) | 1466 | (vip-search vip-s-string t val) |
| 1467 | (if com | 1467 | (if com |
| 1468 | (progn | 1468 | (progn |
| @@ -1480,9 +1480,9 @@ giving null search string." | |||
| 1480 | (if (string= vip-s-string "") | 1480 | (if (string= vip-s-string "") |
| 1481 | (progn | 1481 | (progn |
| 1482 | (setq vip-re-search (not vip-re-search)) | 1482 | (setq vip-re-search (not vip-re-search)) |
| 1483 | (message (format "Search mode changed to %s search." | 1483 | (message "Search mode changed to %s search." |
| 1484 | (if vip-re-search "regular expression" | 1484 | (if vip-re-search "regular expression" |
| 1485 | "vanilla")))) | 1485 | "vanilla"))) |
| 1486 | (vip-search vip-s-string nil val) | 1486 | (vip-search vip-s-string nil val) |
| 1487 | (if com | 1487 | (if com |
| 1488 | (progn | 1488 | (progn |