From 368d0a467659b479b8824de776c0969537a4fb1a Mon Sep 17 00:00:00 2001 From: Karl Berry Date: Mon, 1 May 2017 22:41:15 +0000 Subject: shell set must be case-sensitive since we set %opts. git-svn-id: svn://tug.org/texlive/trunk@44145 c570f23f-e606-0410-a88d-b1316a301751 --- Master/texmf-dist/scripts/texlive/tlmgr.pl | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'Master/texmf-dist/scripts') diff --git a/Master/texmf-dist/scripts/texlive/tlmgr.pl b/Master/texmf-dist/scripts/texlive/tlmgr.pl index 5bafccb5df5..cc08146ab6a 100755 --- a/Master/texmf-dist/scripts/texlive/tlmgr.pl +++ b/Master/texmf-dist/scripts/texlive/tlmgr.pl @@ -5945,9 +5945,9 @@ sub action_shell { } } print "OK\n"; - } elsif ($key =~ m/^(debug-translation|machine-readable|no-execute-actions|require-verification|verify-downloads)$/i) { + } elsif ($key =~ m/^(debug-translation|machine-readable|no-execute-actions|require-verification|verify-downloads)$/) { if ($cmd eq "set") { - $opts{$key} = ($val eq "1" ? 1 : 0); ### THIS DOES NOT WORK??? TODO TODO + $opts{$key} = ($val eq "1" ? 1 : 0); # special cases $::debug_translation = $opts{"debug-translation"}; $::machinereadable = $opts{"machine-readable"}; -- cgit v1.2.3