From: Nicolas Richard <theonewiththeevillook@yahoo.fr>
Date: Wed, 14 May 2014 20:41:53 +0000 (+0200)
Subject: Deal with EIEIO methods without doc strings (Bug#17490).
X-Git-Tag: emacs-24.3.92~204
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=ec264fbb7cb99b193619db76a8d25a228634ffa3;p=emacs.git

Deal with EIEIO methods without doc strings (Bug#17490).

* emacs-lisp/eieio-opt.el (eieio-help-class): Correctly deal with
methods which do not have a doc string.  (Bug#17490)
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index c4df237a668..5ec35ffd14f 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2014-05-14  Nicolas Richard  <theonewiththeevillook@yahoo.fr>
+
+	* emacs-lisp/eieio-opt.el (eieio-help-class): Correctly deal with
+	methods which do not have a doc string.  (Bug#17490)
+
 2014-05-14  Stephen Berman <stephen.berman@gmx.net>
             Stefan Monnier  <monnier@iro.umontreal.ca>
 
diff --git a/lisp/emacs-lisp/eieio-opt.el b/lisp/emacs-lisp/eieio-opt.el
index a502901a469..ca9b91bed58 100644
--- a/lisp/emacs-lisp/eieio-opt.el
+++ b/lisp/emacs-lisp/eieio-opt.el
@@ -141,7 +141,7 @@ If CLASS is actually an object, then also display current values of that object.
 	      (insert " " (aref type counter) " "
 		      (prin1-to-string (car cur) (current-buffer))
 		      "\n"
-		      (cdr cur)))
+		      (or (cdr cur) "")))
 	    (setq counter (1+ counter))))
 	(insert "\n\n")
 	(setq methods (cdr methods))))))