Mercurial > hg > xemacs-beta
comparison lisp/info.el @ 747:9f953fdc1394
[xemacs-hg @ 2002-02-11 12:43:21 by michaels]
2002-02-11 Mike Sperber <mike@xemacs.org>
* info.el (Info-maybe-update-dir): Regenerate dir if we're
regenerating outdated dir files and dir is non-existent.
author | michaels |
---|---|
date | Mon, 11 Feb 2002 12:43:23 +0000 |
parents | a65ddffa00a5 |
children | 943eaba38521 |
comparison
equal
deleted
inserted
replaced
746:b13b1b7b11f1 | 747:9f953fdc1394 |
---|---|
1087 "Rebuild dir or localdir according to `Info-auto-generate-directory'." | 1087 "Rebuild dir or localdir according to `Info-auto-generate-directory'." |
1088 (unless (or (not (file-exists-p (file-name-directory file))) | 1088 (unless (or (not (file-exists-p (file-name-directory file))) |
1089 (null (Info-directory-files file 'all))) | 1089 (null (Info-directory-files file 'all))) |
1090 (if (not (find-buffer-visiting file)) | 1090 (if (not (find-buffer-visiting file)) |
1091 (if (not (file-exists-p file)) | 1091 (if (not (file-exists-p file)) |
1092 (if (or (eq Info-auto-generate-directory 'always) | 1092 (if (or (memq Info-auto-generate-directory |
1093 (eq Info-auto-generate-directory 'if-missing)) | 1093 '(always if-missing if-outdated))) |
1094 (Info-build-dir-anew (file-name-directory file))) | 1094 (Info-build-dir-anew (file-name-directory file))) |
1095 (if (or (eq Info-auto-generate-directory 'always) | 1095 (if (or (eq Info-auto-generate-directory 'always) |
1096 (and (eq Info-auto-generate-directory 'if-outdated) | 1096 (and (eq Info-auto-generate-directory 'if-outdated) |
1097 (Info-dir-outdated-p file))) | 1097 (Info-dir-outdated-p file))) |
1098 (Info-rebuild-dir file)))))) | 1098 (Info-rebuild-dir file)))))) |