home *** CD-ROM | disk | FTP | other *** search
/ ARM Club 2 / ARMCLUB_CD2.iso / _catalogue / _run < prev    next >
Text File  |  1997-04-29  |  712b  |  30 lines
  1. | !RUN file for !Catalogue
  2. | (C) 1997 by M.S Cook and M. Smith
  3. |
  4. Set Catalogue$Dir <Obey$Dir>
  5. IconSprites <Catalogue$Dir>.!Sprites
  6. |
  7. | Check we've seen !Scrap
  8. |
  9. If "<Wimp$ScrapDir>" = "" Then Error A copy of !Scrap is required for the catalogue to work
  10. |
  11. | Set up ArcWeb variables
  12. |
  13. Set ArcWeb$Home local://<Catalogue$Dir>.CATALOGUE.INDEX
  14. Set ArcWeb$Choices <Catalogue$Dir>.ArcWebChcs
  15. |
  16. | Run ArcFS
  17. |
  18. RMEnsure ArcFS 0.73 Filer_Run <Catalogue$Dir>.^.!ArcFS
  19. |
  20. | Run ArcWeb
  21. |
  22. Filer_Run <Catalogue$Dir>.!WEBHELPER
  23. If "<ArcWeb$Running>" <> "yes" Then Filer_Run <Catalogue$Dir>.!ArcWeb
  24. |
  25. | And Display Main Index
  26. |
  27. Set Alias$CatalogueRun Filer_Run <Catalogue$Dir>.CATALOGUE.INDEX
  28. CatalogueRun
  29. Unset Alias$CatalogueRun
  30.