diff options
| author | Siep Kroonenberg <siepo@cybercomm.nl> | 2019-03-20 21:43:09 +0000 |
|---|---|---|
| committer | Siep Kroonenberg <siepo@cybercomm.nl> | 2019-03-20 21:43:09 +0000 |
| commit | d8f24f0475de8cb1184d6d6b063340075340cb00 (patch) | |
| tree | 072f327b2ded2ea500b4ebb56c349338e00fba7a /Master/bin/win32 | |
| parent | 0d20d464af4558e9bb5586316a5e08077a95c5c4 (diff) | |
Test for gui parameter
git-svn-id: svn://tug.org/texlive/trunk@50485 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/bin/win32')
| -rwxr-xr-x | Master/bin/win32/tlmgr.bat | 20 |
1 files changed, 19 insertions, 1 deletions
diff --git a/Master/bin/win32/tlmgr.bat b/Master/bin/win32/tlmgr.bat index 5b25ae16b81..564adbae711 100755 --- a/Master/bin/win32/tlmgr.bat +++ b/Master/bin/win32/tlmgr.bat @@ -11,6 +11,20 @@ rem Get TL installation root (w/o trailing backslash) set tlroot=%~dp0:
set tlroot=%tlroot:\bin\win32\:=%
+rem check for gui argument
+set args=
+
+:rebuildargs
+shift
+if x == x%0 goto nomoreargs
+if gui == %0 goto guibailout
+if -gui == %0 goto guibailout
+if --gui == %0 goto guibailout
+set args=%args% %0
+goto rebuildargs
+
+:nomoreargs
+
rem Remove remains of previous update if any
set tlupdater=%tlroot%\temp\updater-w32
if exist "%tlupdater%" del "%tlupdater%"
@@ -19,7 +33,7 @@ if exist "%tlupdater%" goto :err_updater_exists rem Start tlmgr
set PERL5LIB=%tlroot%\tlpkg\tlperl\lib
path %tlroot%\tlpkg\tlperl\bin;%tlroot%\bin\win32;%path%
-"%tlroot%\tlpkg\tlperl\bin\perl.exe" "%tlroot%\texmf-dist\scripts\texlive\tlmgr.pl" %*
+"%tlroot%\tlpkg\tlperl\bin\perl.exe" "%tlroot%\texmf-dist\scripts\texlive\tlmgr.pl" %args%
rem Finish if there are no updates to do; the last error code will be returned
if not exist "%tlupdater%" goto :eof
@@ -40,3 +54,7 @@ exit /b 1 :err_rename_updater
echo %~nx0: failed to rename "%tlupdater%">&2
exit /b 1
+
+:guibailout
+echo Please use tlshell as a GUI for tlmgr
+exit /b 1
|