home *** CD-ROM | disk | FTP | other *** search
-
- ; $VER: Install 0.001 (1 Dec 1994)
- ;
- ; NAME
- ; Install
- ;
- ; FUNCTION
- ; Lambda installer script.
- ;
- ; SYNOPSIS
- ; installer SCRIPT=Install APPNAME=Lambda
- ;
- ; $HISTORY:
- ;
- ; 1 Dec 1994: 000.001 : initial release.
-
- (
- ; Ask where to install it...
- (if (> @user-level 0)
- (set @default-dest
- (askdir
- (prompt "Select or create the directory where you would "
- "like to install Lambda interpreter package. ")
- (help "Lambda interpreter and all files will be "
- "installed in the directory of your choice. "
- "You may wish to create a new directory for "
- "Lambda by using the 'Make New Drawer' gadget. ")
- (default "RAM:")
- )
- )
- )
-
- (set @default-dest (tackon @default-dest "Lambda"))
-
- ; Copy all files and icons...
- (copyfiles
- (source "Lambda")
- (dest @default-dest)
- (infos)
- (all)
- )
-
- )
-
-