From 5b48fc7bcecdd7532430921ff665cc8eab0022f0 Mon Sep 17 00:00:00 2001 From: Karl Berry Date: Sat, 21 Oct 2023 15:32:27 +0000 Subject: pkgs_ report; sync git-svn-id: svn://tug.org/texlive/trunk@68607 c570f23f-e606-0410-a88d-b1316a301751 --- Build/source/texk/texlive/windows_wrapper/runscript.tlu | 2 +- Master/tlpkg/bin/tl-update-containers | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/Build/source/texk/texlive/windows_wrapper/runscript.tlu b/Build/source/texk/texlive/windows_wrapper/runscript.tlu index 52f7ee45722..c7d6d671a90 100644 --- a/Build/source/texk/texlive/windows_wrapper/runscript.tlu +++ b/Build/source/texk/texlive/windows_wrapper/runscript.tlu @@ -555,7 +555,7 @@ end -- program name -- lower arg[0] : get file name part : remove extension -local progname, substcount = string.lower(arg[0]):gsub('^.*[\\/]', ''):gsub('%.[^.]*$', '') +local progname, substcount = string.lower(arg[0]):gsub('^.*[\\/]', ''):gsub('%.exe$', '') -- special behaviour when called under 'runscript' name if (progname == 'runscript') then -- we are called as: runscript progname ... diff --git a/Master/tlpkg/bin/tl-update-containers b/Master/tlpkg/bin/tl-update-containers index 20c18eba293..3ed837dd508 100755 --- a/Master/tlpkg/bin/tl-update-containers +++ b/Master/tlpkg/bin/tl-update-containers @@ -422,7 +422,7 @@ sub main { if (@todopacks) { # something changed. for my $listname (qw(new removed updated)) { - my @list = eval ('@new_' . $listname); + my @list = eval ('@pkgs_' . $listname); info("$prg: ", 0 + @list, " $listname"); info(@list ? ": @list" : "."); info("\n"); -- cgit v1.2.3