;; Author: Steve Youngs <steve@sxemacs.org>
;; Maintainer: SXEmacs Development Team <sxemacs-devel@sxemacs.org>
;; Created: <2008-05-01>
-;; Homepage: http://www.sxemacs.org/
+;; Homepage: https://www.sxemacs.org/
;; Keywords: util, module, emodule, dumped
;; This file is part of SXEmacs.
path)
module-load-path))
(types (mapfam
- #'(lambda (e)
- (replace-in-string e "\\." ""))
- :initiator "\\.\\("
- :terminator "\\)$"
- :separator "\\|"
- :result-type #'concat module-extensions))
+ #'(lambda (e)
+ (replace-in-string e "\\." ""))
+ :initiator "\\.\\("
+ :terminator "\\)$"
+ :separator "\\|"
+ :result-type #'concat module-extensions))
completions)
(while dirs
(let ((files (directory-files-recur (car dirs) nil types 'list t 0)))