* lisp/emacs-lisp/eieio-opt.el (eieio-help-generic): Don't assume `generic'

is a symbol.

Fixes: debbugs:16584

2 files changed, 6 insertions, 1 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index ddc6221dffe..ad3c5d71aed 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2014-01-30  Stefan Monnier  <monnier@iro.umontreal.ca>
+
+        * emacs-lisp/eieio-opt.el (eieio-help-generic): Don't assume `generic'
+        is a symbol (bug#16584).
+
 2014-01-30  Glenn Morris  <rgm@gnu.org>
 
         * help.el (help-for-help-internal): Add "P" to text.
diff --git a/lisp/emacs-lisp/eieio-opt.el b/lisp/emacs-lisp/eieio-opt.el
index 8e43eff2b83..add4a055ee7 100644
--- a/lisp/emacs-lisp/eieio-opt.el
+++ b/lisp/emacs-lisp/eieio-opt.el
@@ -315,7 +315,7 @@ are not abstract."
 ;;;###autoload
 (defun eieio-help-generic (generic)
   "Describe GENERIC if it is a generic function."
-  (when (generic-p generic)
+  (when (and symbolp generic) (generic-p generic))
     (save-excursion
       (goto-char (point-min))
       (when (re-search-forward " in `.+'.$" nil t)