mes: (mes boot-6): Ignore .mes files in Guile module import.
* mes/module/mes/boot-6.mes (%search-load-path): Do not use (and prefer) ".mes".
This commit is contained in:
parent
15fe2973a0
commit
ab7351af92
|
@ -507,8 +507,7 @@
|
|||
(define (%search-load-path file-name)
|
||||
(when (> %debug 2)
|
||||
(format (current-error-port) "%search-load-path ~s\n" file-name))
|
||||
(let ((file (or (search-path %load-path (string-append file-name ".mes"))
|
||||
(search-path %load-path (string-append file-name ".scm")))))
|
||||
(let ((file (search-path %load-path (string-append file-name ".scm"))))
|
||||
(when (> %debug 1)
|
||||
(format (current-error-port) " *file-name => ~s\n" file))
|
||||
file))
|
||||
|
|
Loading…
Reference in New Issue