home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 11 Util / 11-Util.zip / ENVEDIT1.ZIP / ENVEDIT.CMD < prev    next >
OS/2 REXX Batch file  |  1990-10-14  |  481b  |  20 lines
  1. cls
  2. echo off
  3. if exist c:\!tmp!--!.cmd erase c:\!tmp!--!.cmd
  4. env.exe
  5. if not exist c:\!tmp!--!.cmd goto NoChange
  6. call c:\!tmp!--!.cmd
  7. erase c:\!tmp!--!.cmd
  8. echo ----------------------------------------
  9. echo      Environment changes completed
  10. echo ----------------------------------------
  11. set | more
  12. goto End
  13. :NoChange
  14. cls
  15. echo .
  16. echo ----------------------------------------
  17. echo        Environment Not Changed 
  18. echo ----------------------------------------
  19. :End
  20.