From ca17f652236af2ce3a16cb0125fb6e190d59cc17 Mon Sep 17 00:00:00 2001 From: Norbert Preining Date: Thu, 18 Mar 2021 03:01:43 +0000 Subject: CTAN sync 202103180301 --- systems/texlive/tlnet/tlpkg/TeXLive/TLPSRC.pm | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'systems/texlive/tlnet/tlpkg/TeXLive/TLPSRC.pm') diff --git a/systems/texlive/tlnet/tlpkg/TeXLive/TLPSRC.pm b/systems/texlive/tlnet/tlpkg/TeXLive/TLPSRC.pm index 86592aea22..8f8cf248c6 100644 --- a/systems/texlive/tlnet/tlpkg/TeXLive/TLPSRC.pm +++ b/systems/texlive/tlnet/tlpkg/TeXLive/TLPSRC.pm @@ -1,4 +1,4 @@ -# $Id: TLPSRC.pm 58382 2021-03-15 04:20:36Z preining $ +# $Id: TLPSRC.pm 58462 2021-03-17 01:25:11Z preining $ # TeXLive::TLPSRC.pm - module for handling tlpsrc files # Copyright 2007-2020 Norbert Preining # This file is licensed under the GNU General Public License version 2 @@ -12,7 +12,7 @@ use TeXLive::TLUtils; use TeXLive::TLPOBJ; use TeXLive::TLTREE; -my $svnrev = '$Revision: 58382 $'; +my $svnrev = '$Revision: 58462 $'; my $_modulerevision = ($svnrev =~ m/: ([0-9]+) /) ? $1 : "unknown"; sub module_revision { return $_modulerevision; } @@ -222,7 +222,7 @@ sub from_file { } elsif ($line =~ /^tlpsetvar\s+([-_a-zA-Z0-9]+)\s+(.*)$/) { $tlpvars{$1} = $2; - } elsif ($line =~ /^catalogue-(.+)\s*(.*)$/o) { + } elsif ($line =~ /^catalogue-([^\s]+)\s+(.*)$/o) { $self->{'cataloguedata'}{$1} = $2 if defined $2; } else { -- cgit v1.2.3