* lisp/info.el (Info-insert-dir): Also try "dir.gz".

Ref: http://lists.gnu.org/archive/html/emacs-devel/2012-03/msg00005.html

2 files changed, 6 insertions, 0 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index b4d5a146490..6a9b1808cdf 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2012-03-06  Thien-Thi Nguyen  <ttn@gnuvola.org>
+
+        * info.el (Info-insert-dir): Also try "dir.gz".
+
 2012-03-06  Glenn Morris  <rgm@gnu.org>
 
         * files.el (dir-locals-find-file):
diff --git a/lisp/info.el b/lisp/info.el
index a8cb141114c..8965b2c45c9 100644
--- a/lisp/info.el
+++ b/lisp/info.el
@@ -1165,6 +1165,8 @@ a case-insensitive match is tried."
                        (progn (setq file (expand-file-name "dir.info" truename))
                               (file-attributes file))
                        (progn (setq file (expand-file-name "DIR.INFO" truename))
+                              (file-attributes file))
+                       (progn (setq file (expand-file-name "dir.gz" truename))
                               (file-attributes file)))))
                 (setq dirs-done
                       (cons truename