Windows path sanitize (de-space, shorten)

chkspaces.bat

: Pass path to sanitize as arg 1
@echo off
echo Original path=[%~1]
call :chkspaces "%~1"

if /I NOT "%_sp%" == "%~1" call :shrt "%~1"
echo uglified=[%_sp%]
goto :EOF

:chkspaces
set _sp=%1
set _sp=%_sp: =%
goto :EOF

:shrt
echo arg=[%1]
set _sp=%~s1
goto :EOF

doshortpath.bat

: Shortenize current path. To return, type popd.
@echo off
echo [%cd%]
call :shrt "%cd%"
goto :EOF

:shrt
echo arg=[%1]
set _sp=%~s1
echo short=[%_sp%]
pushd "%_sp%"
goto :EOF