[plt-scheme] setup-extension.ss question

At Tue, 21 Dec 2004 18:52:09 +0800, "Zhu Chongkai" wrote:
>   (define (pre-installer directory-path)

When Setup PLT calls thus function, `directory-path' corresponds to
PLTHOME (e.g., "/usr/FULL-299.25/"), not the collection's directory.
So, the first two arguments here are not what you want:

>     (pre-install (find-system-path 'home-dir)
>                  directory-path

I think those should be 

     (pre-install directory-path
                  (collection-path "mrmathematica")

and the tests should be

 > (pre-installer (string->path "/usr/FULL-299.25/"))
 > (pre-installer (string->path "C:\\Program Files\\PLT-FULLCVS-299.25\\"))


Matthew