* package.el (describe-package): Convert the guess to a string

diff --git a/lisp/emacs-lisp/package.el b/lisp/emacs-lisp/package.el
index 4dafe17acedc41c4a25706bfff03b24a01ef61e8..88dd6ac70f3e3a4a07a9bd006560f7d82f77284d 100644 (file)
--- a/lisp/emacs-lisp/package.el
+++ b/lisp/emacs-lisp/package.el
@@ -2120,7 +2120,8 @@ will be deleted."
                                    (format "Describe package (default %s): "
                                            guess)
                                  "Describe package: ")
-                               packages nil t nil nil guess)))
+                               packages nil t nil nil (when guess
+                                                        (symbol-name guess)))))
          (list (intern val))))))
   (if (not (or (package-desc-p package) (and package (symbolp package))))
       (message "No package specified")