diff options
author | Norbert Preining <preining@logic.at> | 2010-05-13 23:55:23 +0000 |
---|---|---|
committer | Norbert Preining <preining@logic.at> | 2010-05-13 23:55:23 +0000 |
commit | 2f26d0832393ae51ec63cfd728e1913904da5bbc (patch) | |
tree | d379718bcdbc170932aab2a9d9b2ada9e9914284 /Master | |
parent | 85e07a59b01c0da0b0c264872e78158bf97851fa (diff) |
fix two more bugs in the new release/maxrelease code in tlmgr.pl
git-svn-id: svn://tug.org/texlive/trunk@18233 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master')
-rwxr-xr-x | Master/texmf/scripts/texlive/tlmgr.pl | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/Master/texmf/scripts/texlive/tlmgr.pl b/Master/texmf/scripts/texlive/tlmgr.pl index c9e5bc55b54..f8d28f5eb32 100755 --- a/Master/texmf/scripts/texlive/tlmgr.pl +++ b/Master/texmf/scripts/texlive/tlmgr.pl @@ -4246,14 +4246,16 @@ END_NO_INTERNET tldie "The installation repository does not specify a release year for which it was prepared, bailing out.\n"; } # still here, so we have $texlive_release defined - my $texlive_release_year =~ s/^(....).*$/$1/; + my $texlive_release_year = $texlive_release; + $texlive_release_year =~ s/^(....).*$/$1/; if ($texlive_release_year !~ m/^[1-9][0-9][0-9][0-9]$/) { tldie "The installation repository does not specify a release year: $texlive_release, bailing out.\n"; } # so $texlive_release_year is numeric, good if (defined($texlive_maxrelease)) { # we specify a range of years! - my $texlive_maxrelease_year =~ s/^(....).*$/$1/; + my $texlive_maxrelease_year = $texlive_maxrelease; + $texlive_maxrelease_year =~ s/^(....).*$/$1/; if ($texlive_maxrelease_year !~ m/^[1-9][0-9][0-9][0-9]$/) { tldie "The installation repository does not specify a valid maximal release year: $texlive_maxrelease, bailing out.\n"; } |