message format spec fixes, commit # 12

9607bd5d · Deepak Goel · 5c08522d · 9607bd5d
Commit 9607bd5d authored Sep 18, 2005 by Deepak Goel
Hide whitespace changes
Inline Side-by-side

Showing with 2 additions and 2 deletions

lisp/obsolete/fast-lock.el lisp/obsolete/fast-lock.el +2 -2

No files found.
--- a/lisp/obsolete/fast-lock.el
+++ b/lisp/obsolete/fast-lock.el
@@ -226,10 +226,10 @@
              (progn
                (when temp-message
                  (setq current-message (current-message))
-                  (message temp-message))
+                  (message "%s" temp-message))
                ,@body)
           (when temp-message
-             (message current-message))))))
+             (message "%s" current-message))))))
 ;;
 ;; We use this for compatibility with a future Emacs.
 (or (fboundp 'defcustom)