home *** CD-ROM | disk | FTP | other *** search
/ Acorn User 10 / AU_CD10.iso / Archived / Internet / News-Email / NBASE060 / !Newsbase / transports / freenews / startup
Text File  |  1997-08-19  |  281b  |  7 lines
  1. set NewsBase$FreeNewsSupport <NewsBase$Support>.FreeNews
  2. set NewsBase$FreeNewsDir <Obey$Dir>
  3.  
  4. set NewsBase$ReturnCode 0
  5. if "<FreeNews$Dir>" = "" then set NewsBase$ReturnCode 1 else run <Obey$Dir>.mkgroups
  6. if "<FreeNews$Dir>" = "" then set NewsBase$ReturnInfo "!Freenews not found"
  7.