rem --------------------------------------------------------------------------- | |
rem Append to CLASSPATH | |
rem | |
rem $Id$ | |
rem --------------------------------------------------------------------------- | |
rem Process the first argument | |
if ""%1"" == """" goto end | |
set CLASSPATH=%CLASSPATH%;%1 | |
shift | |
rem Process the remaining arguments | |
:setArgs | |
if ""%1"" == """" goto doneSetArgs | |
set CLASSPATH=%CLASSPATH% %1 | |
shift | |
goto setArgs | |
:doneSetArgs | |
:end |