adjusted help string

svn: r1368
This commit is contained in:
Matthew Flatt 2005-11-22 13:35:33 +00:00
parent 478fcecc91
commit efca7c4c6f

View File

@ -85,7 +85,7 @@
(extract-suffix append-constant-pool-suffix)))] (extract-suffix append-constant-pool-suffix)))]
[("-l" "--link-extension") [("-l" "--link-extension")
,(lambda (f) 'link) ,(lambda (f) 'link)
(,(format "Link multiple ~a and ~a files into a ~a file" (,(format "Link ~a and ~a from Scheme sources into a ~a file"
(extract-suffix append-object-suffix) (extract-suffix append-object-suffix)
(extract-suffix append-constant-pool-suffix) (extract-suffix append-constant-pool-suffix)
(extract-suffix append-extension-suffix)))] (extract-suffix append-extension-suffix)))]