[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/help-fns.el,v
From: |
Stefan Monnier |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/help-fns.el,v |
Date: |
Wed, 26 Mar 2008 02:36:48 +0000 |
CVSROOT: /sources/emacs
Module name: emacs
Changes by: Stefan Monnier <monnier> 08/03/26 02:36:47
Index: help-fns.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/help-fns.el,v
retrieving revision 1.116
retrieving revision 1.117
diff -u -b -r1.116 -r1.117
--- help-fns.el 19 Mar 2008 18:21:51 -0000 1.116
+++ help-fns.el 26 Mar 2008 02:36:44 -0000 1.117
@@ -431,7 +431,8 @@
(insert (format " since %s" (nth 2 obsolete))))
(insert ";\n"
(if (stringp (car obsolete)) (car obsolete)
- (format "use `%s' instead." (car obsolete)))
+ (if (null (car obsolete)) ""
+ (format "use `%s' instead." (car obsolete))))
"\n"))
(insert "\n"
(or doc "Not documented.")))))))
@@ -662,7 +663,8 @@
(if (cdr obsolete) (princ (format " since %s" (cdr obsolete))))
(princ ";\n ")
(princ (if (stringp (car obsolete)) (car obsolete)
- (format "use `%s' instead." (car obsolete))))
+ (if (null (car obsolete)) ""
+ (format "use `%s' instead." (car obsolete)))))
(terpri))
(when safe-var
(setq extra-line t)