home *** CD-ROM | disk | FTP | other *** search
/ The Datafile PD-CD 2 / DATAFILE_PDCD2.iso / utilities2 / desklib / Update204 / DeskLib / !DeskLib / !Run
Encoding:
Text File  |  1993-07-21  |  1.0 KB  |  34 lines
  1. | !Run file for !DeskLib (DeskLib compile resources)
  2. | Jason Williams 93
  3.  
  4. IconSprites <Obey$Dir>.!Sprites
  5.  
  6.  
  7. | Set up the DeskLib: path
  8.  
  9. Set DeskLib$Dir <Obey$Dir>
  10. Set DeskLib$Path <DeskLib$Dir>.
  11.  
  12.  
  13. | Check the version of the window manager (RISC OS 2 or 3?)
  14.  
  15. Set WindowManager$Version 300
  16. RMEnsure WindowManager 3.00 Set WindowManager$Version 200
  17.  
  18.  
  19. | Open the .h directory with Filer_OpenDir.
  20. | The settings used give a small-icon alphabetically sorted list
  21. | which appears in the top right corner of the screen, which I
  22. | find is more convenient than most other possible settings.
  23. |
  24. | Now compatible with both RISC OS 2 and 3
  25.  
  26. If "<WindowManager$Version>" = "300" Then Filer_CloseDir <Obey$Dir>.h
  27. If "<WindowManager$Version>" = "300" Then Filer_OpenDir <Obey$Dir>.h 99999 99999 256 99999 -SmallIcons -SortByName
  28.  
  29. Set Alias$OldOSFudge Filer_CloseDir <Obey$Dir>.h
  30. If "<WindowManager$Version>" = "200" Then OldOSFudge
  31. Set Alias$OldOSFudge Filer_OpenDir <Obey$Dir>.h
  32. If "<WindowManager$Version>" = "200" Then OldOSFudge
  33. UnSet Alias$OldOSFudge
  34.