diff options
Diffstat (limited to 'Master/tlpkg/bin/tl-update-tlpdb')
| -rwxr-xr-x | Master/tlpkg/bin/tl-update-tlpdb | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/Master/tlpkg/bin/tl-update-tlpdb b/Master/tlpkg/bin/tl-update-tlpdb index ba83d0ca7e6..dc0b5c4e444 100755 --- a/Master/tlpkg/bin/tl-update-tlpdb +++ b/Master/tlpkg/bin/tl-update-tlpdb @@ -203,9 +203,14 @@ sub compare_and_fix_tlpdbs for my $p (keys %packages_that_need_fixup) { tlwarn("$progname: package $p has different files but same/decreasing revision number\n"); if ($opt_fix_reverse_revisions) { + my $fixp = $p; + if ($p =~ m/^([^.]+)\.([^.]+)$/) { + # that is a .ARCH package, we want to fix up the original tlpsrc + $fixp = $1; + } tlwarn("$progname: trying to fix it by running:\n"); my $time = time(); - my $cmd = "svn propset texlive:force_incr_after_delete $time $opt_master/tlpkg/tlpsrc/$p.tlpsrc"; + my $cmd = "svn propset texlive:force_incr_after_delete $time $opt_master/tlpkg/tlpsrc/$fixp.tlpsrc"; $commitit = 1; tlwarn(" $cmd\n"); TeXLive::TLUtils::xsystem($cmd); |