/[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.56 by pfeiffer, Wed Oct 13 18:54:21 2004 UTC revision 1.57 by jurta, Sat Oct 30 01:06:58 2004 UTC
# Line 473  Return 0 if there is no such symbol." Line 473  Return 0 if there is no such symbol."
473                  (and (symbolp obj) (boundp obj) obj))))                  (and (symbolp obj) (boundp obj) obj))))
474          (error nil))          (error nil))
475        (let* ((str (find-tag-default))        (let* ((str (find-tag-default))
476               (obj (if str (read str))))               (obj (if str (intern str))))
477          (and (symbolp obj) (boundp obj) obj))          (and (symbolp obj) (boundp obj) obj))
478        0))        0))
479    

Legend:
Removed from v.1.56  
changed lines
  Added in v.1.57

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