mirror/gibMacOS
1
0
Fork 0
mirror of https://github.com/corpnewt/gibMacOS.git synced 2024-09-20 01:30:33 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

Update MakeInstall.bat

Browse source
This commit is contained in:
CorpNewt 2020-04-01 19:40:33 -05:00 committed by GitHub
parent 047a823216
commit a780e079ff
No known key found for this signature in database
GPG key ID: 4AEE18F83AFDEB23
1 changed files with 18 additions and 5 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

23
MakeInstall.bat
View file

@ -38,15 +38,28 @@ set "spath="
set "upath="
for /f "tokens=2* delims= " %%i in ('reg.exe query "HKCU\Environment" /v "Path" 2^> nul') do ( if not "%%j" == "" set "upath=%%j" )
for /f "tokens=2* delims= " %%i in ('reg.exe query "HKLM\SYSTEM\CurrentControlSet\Control\Session Manager\Environment" /v "Path" 2^> nul') do ( if not "%%j" == "" set "spath=%%j" )
if not "!spath!" == "" (
if not "%spath%" == "" (
REM We got something in the system path
set "PATH=!spath!"
set "PATH=%spath%"
if not "!upath!" == "" (
REM We also have something in the user path
set "PATH=!PATH!;!upath!"
set "PATH=%PATH%;%upath%"
)
) else if not "!upath!" == "" (
set "PATH=!upath!"
) else if not "%upath%" == "" (
set "PATH=%upath%"
)
REM Remove double semicolons from the adjusted PATH
call :undouble "PATH" ";"
goto :EOF
:undouble <string_name> <character>
REM Helper function to strip doubles of a single character out of a string recursively
set "string_name=%~1"
set "character=%~2"
set "check=!%string_name%:%character%%character%=%character%!"
if not "!check!" == "!%~1!" (
set "!string_name!=!check!"
call :undouble "%~1" "%~2"
)
goto :EOF