Assume that files that start with . are not modules

This commit is contained in:
Jay McCarthy 2015-11-30 08:30:18 -05:00
parent 817fdad2d5
commit fc34292486

View File

@ -52,7 +52,8 @@
(define suffixes
(get-module-suffixes #:mode key #:group group #:namespace namespace))
(byte-pregexp
(bytes-append #"^(.*)\\.(?i:"
(bytes-append #"^([^.].*)\\.(?i:"
(apply bytes-append
(add-between suffixes #"|"))
#")$")))