Mercurial > hg > xemacs-beta

comparison lisp/info.el @ 1232:c08a6fa181d1

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[xemacs-hg @ 2003-01-23 11:38:56 by stephent] commit notice <87lm1cksms.fsf@tleepslib.sk.tsukuba.ac.jp> autoloads patch <87lm1ig654.fsf@tleepslib.sk.tsukuba.ac.jp> Martin's info.el patch <877kd5je7e.fsf@tleepslib.sk.tsukuba.ac.jp>
author stephent
date Thu, 23 Jan 2003 11:39:01 +0000
parents 20baef34a0b0
children 74cb069b8417
comparison
equal deleted inserted replaced
1231:3f6adebda25c 1232:c08a6fa181d1
1038 (while lbuffers 1038 (while lbuffers
1039 (kill-buffer (car lbuffers)) 1039 (kill-buffer (car lbuffers))
1040 (setq lbuffers (cdr lbuffers))) 1040 (setq lbuffers (cdr lbuffers)))
1041 (message "Composing main Info directory...done")) 1041 (message "Composing main Info directory...done"))
1042 (setq Info-dir-contents (buffer-string))) 1042 (setq Info-dir-contents (buffer-string)))
1043 (setq default-directory Info-dir-contents-directory) 1043 (setq default-directory (file-name-as-directory Info-dir-contents-directory))
1044 (setq buffer-file-name (caar Info-dir-file-attributes))) 1044 (setq buffer-file-name (caar Info-dir-file-attributes)))
1045 1045
1046 (defmacro Info-directory-files (dir-file &optional all full nosort files-only) 1046 (defmacro Info-directory-files (dir-file &optional all full nosort files-only)
1047 "Return a list of Info files living in the same directory as DIR-FILE. 1047 "Return a list of Info files living in the same directory as DIR-FILE.
1048 This list actually contains the files living in this directory, except for 1048 This list actually contains the files living in this directory, except for