home *** CD-ROM | disk | FTP | other *** search
/ Gold Fish 3 / goldfish_volume_3.bin / files / dev / lang / lambda / install next >
Text File  |  1995-04-10  |  963b  |  45 lines
  1.  
  2. ; $VER: Install 0.001 (1 Dec 1994)
  3. ;
  4. ; NAME
  5. ;     Install
  6. ;
  7. ; FUNCTION
  8. ;     Lambda installer script.
  9. ;
  10. ; SYNOPSIS
  11. ;     installer SCRIPT=Install APPNAME=Lambda
  12. ;
  13. ; $HISTORY:
  14. ;
  15. ; 1 Dec 1994: 000.001 : initial release.
  16.  
  17. (
  18.    ; Ask where to install it...
  19.    (if (> @user-level 0)
  20.       (set @default-dest
  21.          (askdir
  22.             (prompt "Select or create the directory where you would "
  23.                     "like to install Lambda interpreter package. ")
  24.             (help "Lambda interpreter and all files will be "
  25.                   "installed in the directory of your choice. "
  26.                   "You may wish to create a new directory for "
  27.                   "Lambda by using the 'Make New Drawer' gadget. ")
  28.             (default "RAM:")
  29.          )
  30.       )
  31.    )
  32.  
  33.    (set @default-dest (tackon @default-dest "Lambda"))
  34.    
  35.    ; Copy all files and icons...
  36.    (copyfiles
  37.       (source "Lambda")
  38.       (dest @default-dest)
  39.       (infos)
  40.       (all)
  41.    )
  42.  
  43. )
  44.  
  45.