Mercurial > emacs

changeset 14345:e37ae69fce10

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(vip-replace-string, vip-search-forward, vip-search-backward): Delete format call inside message.
author Karl Heuer <kwzh@gnu.org>
date Thu, 25 Jan 1996 01:13:01 +0000
parents 1e97bcb05a16
children 4a609420dfc1
files lisp/emulation/vip.el
diffstat 1 files changed, 9 insertions(+), 9 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/emulation/vip.el	Thu Jan 25 01:03:29 1996 +0000
+++ b/lisp/emulation/vip.el	Thu Jan 25 01:13:01 1996 +0000
@@ -939,9 +939,9 @@
     (if (string= str "")
 	(progn
 	  (setq vip-re-replace (not vip-re-replace))
-	  (message (format "Replace mode changed to %s."
-			   (if vip-re-replace "regexp replace"
-			     "string replace"))))
+	  (message "Replace mode changed to %s."
+		   (if vip-re-replace "regexp replace"
+		     "string replace")))
       (if vip-re-replace
 	  ;; (replace-regexp
 	  ;;  str
@@ -1460,9 +1460,9 @@
     (if (string= vip-s-string "")
 	(progn
 	  (setq vip-re-search (not vip-re-search))
-	  (message (format "Search mode changed to %s search."
-			   (if vip-re-search "regular expression"
-			     "vanilla"))))
+	  (message "Search mode changed to %s search."
+		   (if vip-re-search "regular expression"
+		     "vanilla")))
       (vip-search vip-s-string t val)
       (if com
 	  (progn
@@ -1480,9 +1480,9 @@
     (if (string= vip-s-string "")
 	(progn
 	  (setq vip-re-search (not vip-re-search))
-	  (message (format "Search mode changed to %s search."
-			   (if vip-re-search "regular expression"
-			     "vanilla"))))
+	  (message "Search mode changed to %s search."
+		   (if vip-re-search "regular expression"
+		     "vanilla")))
       (vip-search vip-s-string nil val)
       (if com
 	  (progn