Don't keep useless return values around.

This commit is contained in:
Vincent St-Amour 2011-06-16 11:34:34 -04:00
parent 847e4b2e23
commit dda1b1c880

View File

@ -26,7 +26,7 @@
;; proc returns the list of tests to be run on each file
(define (transform-dir dir)
(for/list ([name (directory-list dir)]
(for ([name (directory-list dir)]
#:when (test-file? name))
(transform name dir)))