home *** CD-ROM | disk | FTP | other *** search
/ Enigma Amiga Life 113 / EnigmaAmiga113CD.iso / software / on-line / charon / update_charon < prev   
Encoding:
Text File  |  2000-06-24  |  2.0 KB  |  98 lines
  1. ; Charon update script 1.3 (24.6.2000)
  2. ;
  3. ; ©2000 Andrija Antonijevic
  4. ;
  5.  
  6. (complete 0)
  7.  
  8. (message "This script will update Charon v1.2 to v1.3. Do NOT use this "
  9.         "script to update any other version to v1.3. If you have any "
  10.         "version lower than 1.2, abort the installation and either find "
  11.         "older Charon distributions and update to v1.2 step by step and "
  12.         "then use this script to update it to v1.3, or reinstall Charon "
  13.         "using Install_Charon script."
  14. )
  15.  
  16. (set #source-dir
  17.     (if (= 1 (exists @icon))
  18.         (pathonly (expandpath @icon))
  19.     ;else
  20.         (expandpath @icon)
  21.     )
  22. )
  23.  
  24. (if (exists "Charon:" (noreq))
  25.     (set @default-dest "Charon:")
  26. )
  27.  
  28. (set @default-dest
  29.     (askdir
  30.         (prompt "Please select the directory in which Charon executable resides")
  31.         (help @askdir-help)
  32.         (default @default-dest)
  33.     )
  34. )
  35.  
  36. (if (not (exists (tackon @default-dest "Charon")))
  37.     (abort "Charon doesn't seem to be installed.")
  38. )
  39.  
  40. (complete 25)
  41.  
  42. (copyfiles
  43.     (source (tackon #source-dir "Doc"))
  44.     (dest (tackon @default-dest "Doc"))
  45.     (infos)
  46.     (all)
  47. )
  48.  
  49. (complete 35)
  50.  
  51. (copyfiles
  52.     (source (tackon #source-dir "Libs/Charon_AmiSSL.library"))
  53.     (dest (tackon @default-dest "Libs"))
  54. )
  55.  
  56. (copyfiles
  57.     (source (tackon #source-dir "Libs/Charon_classes.library"))
  58.     (dest (tackon @default-dest "Libs"))
  59. )
  60.  
  61. (copyfiles
  62.     (source (tackon #source-dir "Libs/Charon_FTP.library"))
  63.     (dest (tackon @default-dest "Libs"))
  64. )
  65.  
  66. (copyfiles
  67.     (source (tackon #source-dir "Libs/Charon_HTTP.library"))
  68.     (dest (tackon @default-dest "Libs"))
  69. )
  70.  
  71. (copyfiles
  72.     (source (tackon #source-dir "Libs/Charon_MiamiSSL.library"))
  73.     (dest (tackon @default-dest "Libs"))
  74. )
  75.  
  76. (copyfiles
  77.     (source (tackon #source-dir "Libs/Charon_search.library"))
  78.     (dest (tackon @default-dest "Libs"))
  79. )
  80.  
  81. (copyfiles
  82.     (source (tackon #source-dir "Libs/Charon_utility.library"))
  83.     (dest (tackon @default-dest "Libs"))
  84. )
  85.  
  86. (complete 75)
  87.  
  88. (copyfiles
  89.     (source (tackon #source-dir "Charon"))
  90.     (dest @default-dest)
  91. )
  92.  
  93. (delete "ENVARC:CharonTime" force)
  94.  
  95. (complete 100)
  96.  
  97. (exit "Charon installation updated successfully. Enjoy using Charon!")
  98.