home *** CD-ROM | disk | FTP | other *** search
/ The Pier Shareware 6 / The_Pier_Shareware_Number_6_(The_Pier_Exchange)_(1995).iso / 035 / vxrxs21a.zip / macros / vxrez / cleanup.vrm < prev    next >
Text File  |  1994-10-31  |  369b  |  22 lines
  1. /*
  2.  * cleanup.vrm -- Copy the old .NRZ files over the .EXE files
  3.  */
  4.  
  5.     call Restore 'PMRUN'
  6.     call Restore 'PMEXE'
  7.  
  8.     exit
  9.  
  10. Restore:
  11.     VXPath = VREPath()
  12.     name = arg(1)
  13.  
  14.     nrz = VXPath || name || '.NRZ'
  15.     exe = VXPath || name || '.EXE'
  16.  
  17.     if( VRFileExists( nrz ) \= 0 )then do
  18.         call VRCopyFile nrz, exe
  19.     end
  20.  
  21.     return
  22.