pre-installer.ss
(module pre-installer mzscheme
        (provide pre-installer)

        (define (pre-installer plthome package-dir)
          (let ((dir (current-directory)))
            
            (current-directory package-dir)
            
;            (if (file-exists? "../../hwiki-plugins.scm")
;                (delete-file "../../hwiki-plugins.scm"))
;            (copy-file "examples/hwiki-plugins.scm" "../../hwiki-plugins.scm")
            
;            (if (file-exists? "../../hwiki-sqli.scm")
;                (delete-file "../../hwiki-sqli.scm"))
;            (copy-file "examples/hwiki-sqli.scm" "../../hwiki-sqli.scm")))
 
            (current-directory dir)
            ))
        )