diff options
| author | Norbert Preining <preining@logic.at> | 2017-11-13 17:05:00 +0000 |
|---|---|---|
| committer | Norbert Preining <preining@logic.at> | 2017-11-13 17:05:00 +0000 |
| commit | 86830c3b1728a5ad4d946bc32b722762a9010439 (patch) | |
| tree | 5c0ed00a642ec8eb85f1d6fadf690ea250808ffe /Master/texmf-dist/scripts | |
| parent | 0a02e64a0bffda4a790855d51deab7d8df6e3937 (diff) | |
if only paper is given to tlmgr shell, respond like paper paper
git-svn-id: svn://tug.org/texlive/trunk@45775 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/scripts')
| -rwxr-xr-x | Master/texmf-dist/scripts/texlive/tlmgr.pl | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/Master/texmf-dist/scripts/texlive/tlmgr.pl b/Master/texmf-dist/scripts/texlive/tlmgr.pl index 9a1dc2bb0c2..d925cc0f3cf 100755 --- a/Master/texmf-dist/scripts/texlive/tlmgr.pl +++ b/Master/texmf-dist/scripts/texlive/tlmgr.pl @@ -1196,6 +1196,12 @@ sub action_paper { $ENV{"TEXMFCONFIG"} = $texmfconfig; my $action = shift @ARGV; + if (!$action) { + # can only happen in shell mode, because otherwise we push paper onto the stack before + # going into the action_paper + $action = "paper"; + } + if ($action =~ m/^paper$/i) { # generic paper my $newpaper = shift @ARGV; if ($opts{"list"}) { # tlmgr paper --list => complain. |