X-Git-Url: http://git.chise.org/gitweb/?p=chise%2Fxemacs-chise.git.1;a=blobdiff_plain;f=lisp%2Finfo.el;fp=lisp%2Finfo.el;h=f9e74d03d996747f10c765daae0402ef2d599059;hp=be66af10d87c0462fc2584596c7569466ebd4160;hb=d8654f7c5ad0c04060008c6fbbd90add1f4537e3;hpb=426fe636212336bb32a5e6f187c4d623709fa57d

diff --git a/lisp/info.el b/lisp/info.el
index be66af1..f9e74d0 100644
--- a/lisp/info.el
+++ b/lisp/info.el
@@ -393,7 +393,7 @@ file. An example might be something like:
   :type '(repeat directory)
   :group 'info)
 
-(defcustom Info-auto-generate-directory 'if-missing
+(defcustom Info-auto-generate-directory 'if-outdated
   "*When to auto generate an info directory listing.
 Possible values are:
 nil or `never' never auto-generate a directory listing,
@@ -1087,8 +1087,8 @@ optional arguments."
 	      (null (Info-directory-files file 'all)))
     (if (not (find-buffer-visiting file))
 	(if (not (file-exists-p file))
-	    (if (or (eq Info-auto-generate-directory 'always)
-		    (eq Info-auto-generate-directory 'if-missing))
+	    (if (or (memq Info-auto-generate-directory
+			  '(always if-missing if-outdated)))
 		(Info-build-dir-anew (file-name-directory file)))
 	  (if (or (eq Info-auto-generate-directory 'always)
 		  (and (eq Info-auto-generate-directory 'if-outdated)