home *** CD-ROM | disk | FTP | other *** search
- ; Very simple installer script for DITO vocabularies
- ; --------------------------------------------------
-
- (message
- "\nDITO\n"
- "© Dirk Holtwick, 1996\n\n"
- "DITO is a very flexible learning system for "
- "languages. Notice that it is SHAREWARE and that "
- "you have to pay a fee if you want to use it often.\n\n"
- "Please read the README file for further informations.\n\n"
- "Enjoy it, Dirk"
- )
-
- ;
- ; Copy all files
- ; --------------
-
- (set destname
- (askdir
- (prompt "Where do you want to install the includefiles")
- (help @askdir-help)
- (default "Include:")
- )
- )
-
- (copyfiles
- (prompt "Copying extension includes")
- (help @copyfiles-help)
- (source "Extensions/Include")
- (dest destname)
- (all)
- )
-
- (copyfiles
- (prompt "Copying library includes")
- (help @copyfiles-help)
- (source "Library/Include")
- (dest destname)
- (all)
- )
-
-