home *** CD-ROM | disk | FTP | other *** search
/ AMIGA PD 1 / AMIGA-PD-1.iso / Meeting_Pearls_II / SetAttributesDir / Pearls / comm / UMS / Developer / SetAttributes
Text File  |  1995-03-09  |  727b  |  28 lines
  1. .k ScriptDir/A
  2. Failat 21
  3. Protect "arexx" "RWED"
  4. FileNote "arexx" ""
  5. CD "arexx"
  6. Assign ScriptDir<$$>.5: "<ScriptDir>"
  7. Execute "ScriptDir<$$>.5:arexx/SetAttributes" "ScriptDir<$$>.5:arexx"
  8. CD /
  9. Protect "demo" "RWED"
  10. FileNote "demo" ""
  11. CD "demo"
  12. Assign ScriptDir<$$>.5: "<ScriptDir>"
  13. Execute "ScriptDir<$$>.5:demo/SetAttributes" "ScriptDir<$$>.5:demo"
  14. CD /
  15. Protect "doc" "RWED"
  16. FileNote "doc" ""
  17. CD "doc"
  18. Assign ScriptDir<$$>.5: "<ScriptDir>"
  19. Execute "ScriptDir<$$>.5:doc/SetAttributes" "ScriptDir<$$>.5:doc"
  20. CD /
  21. Protect "interfaces" "RWED"
  22. FileNote "interfaces" ""
  23. CD "interfaces"
  24. Assign ScriptDir<$$>.5: "<ScriptDir>"
  25. Execute "ScriptDir<$$>.5:interfaces/SetAttributes" "ScriptDir<$$>.5:interfaces"
  26. CD /
  27. Assign ScriptDir<$$>.5:
  28.