* apropos.el (apropos-symbols-internal): Avoid error with non-symbol properties.

Fixes: debbugs:18337

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 6e3be6ce9aab94b284d98fe62c6baa7371d17f1f..9af5186375e267905cbcc55123e4304a46749f7e 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,8 @@
 2014-10-04  Glenn Morris  <rgm@gnu.org>
 
+       * apropos.el (apropos-symbols-internal):
+       Avoid error with non-symbol properties.  (Bug#18337#16)
+
        * startup.el (command-line):
        Handle altered user-emacs-directory in load-path warning.  (Bug#18512)
 

diff --git a/lisp/apropos.el b/lisp/apropos.el
index 2cba65e95598281ecf4321299f2b02285b871f6e..ac76ce26b41ae2f8d158740867188d5ace9bb8a1 100644 (file)
--- a/lisp/apropos.el
+++ b/lisp/apropos.el
@@ -718,7 +718,7 @@ the output includes key-bindings of commands."
                 (setq doc (list (car properties)))
                 (while (setq properties (cdr (cdr properties)))
                   (setq doc (cons (car properties) doc)))
-                (mapconcat #'symbol-name (nreverse doc) " "))
+                (mapconcat (lambda (p) (format "%s" p)) (nreverse doc) " "))
               (when (get symbol 'widget-type)
                 (apropos-documentation-property
                  symbol 'widget-documentation t))