anchor.diff:  goto EOF
   
   
  +:SET_LEIN_ROOT
  +set LEIN_ROOT=%~f1
  +goto EOF
  +
   rem Find directory containing filename supplied in first argument
   rem looking in current directory, and looking up the parent
   rem chain until we find it, or run out
  
positive.code: if "x%1" == "xself-install" goto SELF_INSTALL
  if "x%1" == "xupgrade"      goto NO_UPGRADE
  
  if not exist "%LEIN_JAR%" goto NO_LEIN_JAR
  
  if "x%LEIN_HOME%" == "x" (
      set LEIN_HOME=%HOMEDRIVE%%HOMEPATH%\.lein
  
negative.code: )
  set LEIN_USER_PLUGINS=!LEIN_USER_PLUGINS!"
  
  set CLASSPATH=%LEIN_USER_PLUGINS%;%LEIN_PLUGINS%;test;src;"%CLASSPATH%"
  
  if exist "%~f0\..\..\src\leiningen\core.clj" (
      rem Running from source checkout.
      call :SET_LEIN_ROOT "%~f0\..\.."
  
      set LEIN_LIBS="
      for %%j in ("!LEIN_ROOT!\lib\*") do set LEIN_LIBS=!LEIN_LIBS!;%%~fj
      set LEIN_LIBS=!LEIN_LIBS!"
  
      if "x!LEIN_LIBS!" == "x" if not exist "%LEIN_JAR%" goto NO_DEPENDENCIES
  
      set CLASSPATH="!LEIN_ROOT!\src";"!LEIN_ROOT!\resources";!LEIN_LIBS!;%CLASSPATH%;"%LEIN_JAR%"
  ) else (
      rem Not running from a checkout.
      if not exist "%LEIN_JAR%" goto NO_LEIN_JAR
      set CLASSPATH="%LEIN_JAR%";%CLASSPATH%
  )
  
  if not "x%DEBUG%" == "x" echo CLASSPATH=%CLASSPATH%
  rem ##################################################
  