Mercurial > emacs

diff lisp/emulation/viper-macs.el @ 65589:0670efd1e2df

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
message format spec fixes, commit # 8
author Deepak Goel <deego@gnufans.org>
date Sun, 18 Sep 2005 12:39:40 +0000
parents 34bd8e434dd7
children 511f8e9d22ca fa0da9b57058
line wrap: on
line diff
--- a/lisp/emulation/viper-macs.el	Sun Sep 18 12:38:39 2005 +0000
+++ b/lisp/emulation/viper-macs.el	Sun Sep 18 12:39:40 2005 +0000
@@ -186,7 +186,7 @@
 	       variant (if (> (length key-seq) 0)
 			   (prin1-to-string (viper-display-macro key-seq))
 			 "")))
-	(message message)
+	(message "%s" message)
 	(setq event (viper-read-key))
 	;;(setq event (viper-read-event))
 	(setq key
@@ -263,7 +263,7 @@
 			   (prin1-to-string
 			    (viper-display-macro key-seq))
 			 "")))
-	(message message)
+	(message "%s" message)
 	(setq event (viper-read-key))
 	;;(setq event (viper-read-event))
 	(setq key
@@ -442,7 +442,11 @@
 		       scope)
 	       viper-custom-file-name))
 
-	  (message msg)
+	  ;; 2005-09-18 T06:41:22-0400 (Sunday)    D. Goel
+	  ;; From careful parsing of the above code, it looks like msg
+	  ;; couldn't be nil when we reach here. Since it is a string,
+	  ;; and a complicated one too, we might as well provide it a "%s"
+	  (message "%s" msg)
 	  ))
 
     (setq new-elt