//
//  OPENBROWSER.VDM          Ch. Ziemski 04.05.2001
//
//  (using code from VEDIT itself)
//
//
//  Opens the current file in the standard browser.
//

RGI(121,"HKEY_CLASSES_ROOT\http\shell\open\command\")
#121=0
if(RSIZE(121)<05){
  RS(121,"start")
  if(IsWinNT){
    #121=DOS+SIMPLE
  }
}else{
  #120=BN
  BS(NAB)
  BY(OK)
  RI(121)
  R("/|M|>","",BEGIN+NOERR)
  BOF
  RC(121,1)
  BQ(OK)
  BS(#120)
}
Sys(`|@(121) |(PATHNAME)`,#121+NOWAIT)