home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 10 Tools / 10-Tools.zip / cenvi23.zip / CENVISET.CMD < prev    next >
OS/2 REXX Batch file  |  1995-03-31  |  2KB  |  44 lines
  1. @echo OFF
  2. REM ***************************************************************************
  3. REM *** CEnviSet.cmd - This is a kludge file to be used with CEnvi for OS/2 ***
  4. REM *** ver.1          when you want to update Environment Variables that   ***
  5. REM ***                the Cmm code may have changed.  This KLUDGE step     ***
  6. REM ***                will go away whenever Nombas discovers a valid way   ***
  7. REM ***                for altering environment variables in the command    ***
  8. REM ***                interpreter.  Also, this is not very multitasking    ***
  9. REM ***                compatible since only one file name is used, and so  ***
  10. REM ***                different files may be used simultaneaously.         ***
  11. REM ***************************************************************************
  12.  
  13. REM *** SET A VALUE FOR CENVI_ESET COMMAND FILE IF ONE IS NOT ALREADY SET
  14.    SET REMEMBER_CENVI_ESET=%CENVI_ESET%
  15.    if a%CENVI_ESET%z == az set CENVI_ESET=TempSet.cmd
  16.  
  17. REM *** BUILD A VARIABLE WITH ENTIRE INPUT PARAMETERS (MAY BE > 9)
  18.    SET CENVI_ARGUMENTS=
  19.    :NEXT_ARG
  20.       IF q%1q == qq GOTO NO_MORE_ARGS
  21.       SET CENVI_ARGUMENTS=%CENVI_ARGUMENTS% %1
  22.       SHIFT
  23.       GOTO NEXT_ARG
  24.    :NO_MORE_ARGS
  25.  
  26. REM *** CALL CEnvi2 AND LET IT DO ITS STUFF, INCLUDING SET EVAR FILE
  27.    CEnvi2.exe %CENVI_ARGUMENTS%
  28.  
  29. REM *** EXECUTE THE TEMPORARY CENVI_ESET FILE TO SET ENVIRONMENT VARS
  30.    if exist %CENVI_ESET% CALL %CENVI_ESET%
  31.  
  32. REM *** DELETE THE %CENVI_ESET% FILE, WHILE AVOIDING UNDELETE TIME
  33.    if not exist %CENVI_ESET% GOTO FINI
  34.       SETLOCAL
  35.       SET DELDIR=
  36.       del %CENVI_ESET%
  37.       ENDLOCAL
  38.  
  39. REM *** CLEANUP
  40.    :FINI
  41.    SET CENVI_ESET=%REMEMBER_CENVI_ESET%
  42.    SET REMEMBER_CENVI_ESET=
  43.    SET CENVI_ARGUMENTS=
  44.