If "<Choices$Path>" = "" Then Set CDViewer$Choices <Obey$Dir>
If "<CDViewer$Choices>" = "" Then Set CDViewer$Choices <Choices$Dir>.CDViewer

Set CDViewer$Dir <Obey$Dir>
Set CDViewer$Path <Obey$Dir>.Apps.

Set Load "Yes"
RMEnsure CDROMFS 0.00 RMEnsure CDFS 0.00 Set Load "No"

RMEnsure Toolbox      1.36 RMLoad System:Modules.Toolbox.Toolbox
RMEnsure Toolbox      1.36 Error CDViewer requires version 1.36 or later of the Toolbox module

RMEnsure IconBar      1.12 RMLoad System:Modules.Toolbox.IconBar
RMEnsure IconBar      1.12 Error CDViewer requires version 1.14 or later of the IconBar module

RMEnsure ProgInfo     0.09 RMLoad System:Modules.Toolbox.ProgInfo
RMEnsure ProgInfo     0.09 Error CDVierer requires version 0.09 or later of the ProgInfo module

RMEnsure Window       1.31 RMLoad System:Modules.Toolbox.Window
RMEnsure Window       1.31 Error CDViewer requires version 1.41 or later of the Window module

RMEnsure Menu         0.24 RMLoad System:Modules.Toolbox.Menu
RMEnsure Menu         0.24 Error CDViewer requires version 0.28 or later of the Menu module

RMEnsure SharedCLibrary 3.76 System:modules.clib
RMEnsure SharedCLibrary 3.76 Error CDViewer requires SharedCLibrary 3.76 or later.

RMEnsure CDBase       0.02 RMLoad CDBase:CDBase
RMEnsure CDBase       0.02 Error CDViewer requires !CDBase version 0.01 or later.

RMEnsure CDView       0.02 Filer_Run <CDViewer$Dir>.CDView

If Load="Yes" Then Filer_Run <CDViewer$Dir>.!Run2

UnSet Load

