/[emacs]/emacs/lisp/help-fns.el
ViewVC logotype

Diff of /emacs/lisp/help-fns.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.16 by lektu, Mon Jul 15 15:38:49 2002 UTC revision 1.17 by lektu, Mon Jul 15 16:17:01 2002 UTC
# Line 448  it is displayed along with the global va Line 448  it is displayed along with the global va
448                (when obsolete                (when obsolete
449                  (princ "This variable is obsolete")                  (princ "This variable is obsolete")
450                  (if (cdr obsolete) (princ (format " since %s" (cdr obsolete))))                  (if (cdr obsolete) (princ (format " since %s" (cdr obsolete))))
451                  (princ "; ") (terpri)                  (princ ";") (terpri)
452                  (princ (if (stringp (car obsolete)) (car obsolete)                  (princ (if (stringp (car obsolete)) (car obsolete)
453                           (format "use `%s' instead." (car obsolete))))                           (format "use `%s' instead." (car obsolete))))
454                  (terpri)                  (terpri)

Legend:
Removed from v.1.16  
changed lines
  Added in v.1.17

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26