message format spec fixes, commit # 9

[gnu-emacs] / lisp / emacs-lisp / find-func.el

diff --git a/lisp/emacs-lisp/find-func.el b/lisp/emacs-lisp/find-func.el
index d860bfcd59843c0875153695c2f603dfef0730d6..dea72fc7567d5f15ae9fbf60b8f24572684c1550 100644 (file)
--- a/lisp/emacs-lisp/find-func.el
+++ b/lisp/emacs-lisp/find-func.el
@@ -260,7 +260,7 @@ in `load-path'."
       (setq function (symbol-function function)
            def (symbol-function function)))
     (if aliases
-       (message aliases))
+       (message "%s" aliases))
     (let ((library
           (cond ((eq (car-safe def) 'autoload)
                  (nth 1 def))