;Installer For Newsed3 & Arfir
;
;©Martin Hunt 1995
;
;


(set @defaultdest
   (askdir
       (prompt "Where do you want to install Arfir and Newsed")
       (help @askdir-help)
       (default "amitcp:bin")
   )
)

(copyfiles
   (prompt "Copying Files To " @defaultdest )
   (help @copyfiles-help)
   (source "mainfiles/")
   (all)
   (dest @defaultdest)
   (infos)
   (confirm)
)

(set postnews
  (askbool
      (default 1)
      (prompt "Do you want to install the new postnews script\nSo that Newsed's signature options will work\n and so that GRn will post news?\n")
      (help @askbool-help)
  )
)
(if (= postnews 1)
    (
      (set arfirdest
         (askdir
            (prompt "Where do you want to install the postnews scripts?")
            (help @askdir-help)
            (default "amitcp:bin")
         )
      )
      (set whichpostnews
         (askbool
            (prompt "Are you a Demon Internet subscriber?")
            (help @askbool-help)
            (default 0)
         )
      )
      (if (= whichpostnews 0)
         (copyfiles
            (prompt "Copying Files To " arfirdest )
            (help @copyfiles-help)
            (source "bin/other")
            (all)
            (dest arfirdest)
            (confirm)
            (infos)
         )
         (copyfiles
            (prompt "Copying Files To " arfirdest )
            (help @copyfiles-help)
            (source "bin/demon")
            (all)
            (dest arfirdest)
            (confirm)
            (infos)
         )
      )
    )
)

(set docs
   (askdir
       (prompt "Where do you want the doc files to be installed?")
       (help @askdir-help)
       (default "amitcp:docs")
   )
)

(copyfiles
 (prompt "Copying Docs To "docs)
   (help @copyfiles-help)
   (source "docs")
   (all)
   (dest docs)
   (infos)
   (confirm)
)

(copylib
   (prompt "Copying Apig.Library to Libs:" )
   (help @copyfiles-help)
   (source "Libs/apig.library")
   (dest "Libs:")
   (infos)
   (confirm)
)
(copylib
   (prompt "Copying rexxsupport.library to Libs:" )
   (help @copyfiles-help)
   (source "Libs/rexxsupport.library")
   (dest "Libs:")
   (infos)
   (confirm)
)