fix typo in unixstyle-install

This commit is contained in:
Matthew Flatt 2010-05-26 14:27:37 -06:00
parent 51dfbe6bc2
commit a8130eb7c3

View File

@ -200,7 +200,7 @@
(fix-executable f)))
;; fix the starter executable too
(parameterize ([current-directory (dir: 'librkt)])
(when (file-exists "starter") (fix-executable "starter"))))
(when (file-exists? "starter") (fix-executable "starter"))))
;; remove and record all empty dirs
(define (remove-empty-dirs dir)