diff lisp/image-dired.el @ 87096:a99a2e8bc21e

Fix possibly buggy calls to `message'.

--- a/lisp/image-dired.el	Wed Dec 05 22:16:17 2007 +0000
+++ b/lisp/image-dired.el	Thu Dec 06 00:17:56 2007 +0000
@@ -1184,7 +1184,7 @@
                     ", "))
             (comment (get-text-property (point) 'comment)))
         (if file-name
-            (message
+             (message "%s"
              (image-dired-format-properties-string
               dired-buf
               file-name
@@ -1208,7 +1208,7 @@
     (if (not (and dired-buf file-name))
         (message "No image, or image with correct properties, at point.")
     (with-current-buffer dired-buf
-        (message file-name)
+        (message "%s" file-name)
         (setq file-name (file-name-nondirectory file-name))
         (goto-char (point-min))
         (if (search-forward file-name nil t)
@@ -2239,7 +2239,7 @@
                  ", "))
          (comment (image-dired-get-comment file)))
     (if file-name
-        (message
+        (message "%s"
          (image-dired-format-properties-string
           dired-buf
           file-name