# HG changeset patch
# User youngs
# Date 991381613 0
# Node ID 455754515716c5f623f527b08da2bb1f96553e30
# Parent  a99eebfee7d396cc24f431029092ac63a79f0d1f
[xemacs-hg @ 2001-06-01 07:46:53 by youngs]
Patch from Karl

diff -r a99eebfee7d3 -r 455754515716 lisp/ChangeLog
--- a/lisp/ChangeLog	Fri Jun 01 07:15:33 2001 +0000
+++ b/lisp/ChangeLog	Fri Jun 01 07:46:53 2001 +0000
@@ -1,3 +1,8 @@
+2001-05-13  Karl M. Hegbloom  <karlheg@hegbloom.net>
+
+	* packages.el (locate-data-file): Use suffixes list to allow
+	finding compressed copies of the data files.
+
 2001-05-30  Ben Wing  <ben@xemacs.org>
 
 	* etags.el (buffer-tag-table-list):
diff -r a99eebfee7d3 -r 455754515716 lisp/packages.el
--- a/lisp/packages.el	Fri Jun 01 07:15:33 2001 +0000
+++ b/lisp/packages.el	Fri Jun 01 07:46:53 2001 +0000
@@ -344,7 +344,7 @@
   "Locate a file in a search path DIR-LIST (a list of directories).
 If no DIR-LIST is supplied, it defaults to `data-directory-list'.
 This function is basically a wrapper over `locate-file'."
-  (locate-file name (or dir-list data-directory-list)))
+  (locate-file name (or dir-list data-directory-list) '("" ".gz" ".bz2")))
 
 ;; Path setup