home *** CD-ROM | disk | FTP | other *** search
- ;******************************************************************************
- ; Installation script for DataTypes Collection #2 (AMS)
- ; Written by David N. Junod
- ;
- ; Modified for DTpref
- ; Swen K. Stullich 10.03.95
- ;******************************************************************************
-
- ; Initialize a few things
- (set docbits 0)
-
- ;******************************************************************************
- ; Prompt for components and their directories
-
- ; Prefs
- (set prefsdir
- (askdir
- (prompt "Where do the Preferences belong")
- (help @askdir-help)
- (default "SYS:Prefs")
- )
- )
-
- ; Docs
- (set docsdir
- (askdir
- (prompt "Where do the Documentations belong")
- (help @askdir-help)
- (default "SYS:Docs")
- )
- )
-
- ;******************************************************************************
- ;******************************************************************************
- ;******************************************************************************
-
- ;**********************************************************************
- ; Install
- ;**********************************************************************
- (
- ; Show what we are doing
- (working "Installing " @app-name)
-
- ; Install the library
- (copylib
- (prompt "Copying gtlayout.library")
- (help @copylib-help)
- (source "libs/gtlayout.library")
- (dest "LIBS:")
- (confirm)
- )
-
- ; Install the Editor
- (copyfiles
- (prompt "Copying the Preferenceseditor")
- (help @copyfiles-help)
- (source "DTpref/")
- (dest prefsdir)
- (pattern "#?")
- (infos)
- ; (confirm)
- )
-
- ; Install the Docs
- (copyfiles
- (prompt "Copying the Documentations")
- (help @copyfiles-help)
- (source "Docs/")
- (dest docsdir)
- (pattern "#?")
- (infos)
- (confirm)
- )
- )
-
- (set @default-dest prefsdir)
- (set @default-dest docsdir)
-