s/sld/module to reflect change in library definition extension

This commit is contained in:
Alex Shinn 2011-11-04 19:11:24 +09:00
parent 51b01d34a7
commit 1cec98193e

View file

@ -86,7 +86,7 @@
(cond (cond
((file-directory? file) ((file-directory? file)
(process-dir file)) (process-dir file))
((equal? "module" (path-extension file)) ((equal? "sld" (path-extension file))
(let* ((mod-path (path-strip-extension (path-relative file basedir))) (let* ((mod-path (path-strip-extension (path-relative file basedir)))
(mod-name (map (lambda (x) (or (string->number x) (string->symbol x))) (mod-name (map (lambda (x) (or (string->number x) (string->symbol x)))
(path-split mod-path)))) (path-split mod-path))))