Mercurial > hg > xemacs-beta

comparison lisp/packages.el @ 601:455754515716

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[xemacs-hg @ 2001-06-01 07:46:53 by youngs] Patch from Karl
author youngs
date Fri, 01 Jun 2001 07:46:53 +0000
parents ef4d2466a29c
children 59c2a61efa7d
comparison
equal deleted inserted replaced
600:a99eebfee7d3 601:455754515716
342 342
343 (defun locate-data-file (name &optional dir-list) 343 (defun locate-data-file (name &optional dir-list)
344 "Locate a file in a search path DIR-LIST (a list of directories). 344 "Locate a file in a search path DIR-LIST (a list of directories).
345 If no DIR-LIST is supplied, it defaults to `data-directory-list'. 345 If no DIR-LIST is supplied, it defaults to `data-directory-list'.
346 This function is basically a wrapper over `locate-file'." 346 This function is basically a wrapper over `locate-file'."
347 (locate-file name (or dir-list data-directory-list))) 347 (locate-file name (or dir-list data-directory-list) '("" ".gz" ".bz2")))
348 348
349 ;; Path setup 349 ;; Path setup
350 350
351 (defun packages-find-package-directories (roots base) 351 (defun packages-find-package-directories (roots base)
352 "Find a set of package directories." 352 "Find a set of package directories."