Set Mouse$Dir <Obey$Dir>
Set Alias$do Set Alias$doit %%*0|m doit
Do Filer_OpenDir <Mouse$Dir>