Mercurial > hg > xemacs-beta
comparison lisp/info.el @ 410:de805c49cfc1 r21-2-35
Import from CVS: tag r21-2-35
author | cvs |
---|---|
date | Mon, 13 Aug 2007 11:19:21 +0200 |
parents | 2f8bb876ab1d |
children | 697ef44129c6 |
comparison
equal
deleted
inserted
replaced
409:301b9ebbdf3b | 410:de805c49cfc1 |
---|---|
590 (while f | 590 (while f |
591 (if (and (file-exists-p (car f)) (not (get-file-buffer (car f)))) | 591 (if (and (file-exists-p (car f)) (not (get-file-buffer (car f)))) |
592 (bury-buffer (find-file-noselect (car f)))) | 592 (bury-buffer (find-file-noselect (car f)))) |
593 (setq f (cdr f))))) | 593 (setq f (cdr f))))) |
594 | 594 |
595 ;;;###autoload | |
595 (defun Info-find-node (filename &optional nodename no-going-back tryfile line) | 596 (defun Info-find-node (filename &optional nodename no-going-back tryfile line) |
596 "Go to an info node specified as separate FILENAME and NODENAME. | 597 "Go to an info node specified as separate FILENAME and NODENAME. |
597 Look for a plausible filename, or if not found then look for URL's and | 598 Look for a plausible filename, or if not found then look for URL's and |
598 dispatch to the appropriate fn. NO-GOING-BACK is non-nil if | 599 dispatch to the appropriate fn. NO-GOING-BACK is non-nil if |
599 recovering from an error in this function; it says do not attempt | 600 recovering from an error in this function; it says do not attempt |