texlive[48520] Master/tlpkg/TeXLive/TLTREE.pm: fix -init-from-git in
commits+preining at tug.org
commits+preining at tug.org
Fri Aug 31 05:41:13 CEST 2018
Revision: 48520
http://tug.org/svn/texlive?view=revision&revision=48520
Author: preining
Date: 2018-08-31 05:41:13 +0200 (Fri, 31 Aug 2018)
Log Message:
-----------
fix -init-from-git in texlive.git
Modified Paths:
--------------
trunk/Master/tlpkg/TeXLive/TLTREE.pm
Modified: trunk/Master/tlpkg/TeXLive/TLTREE.pm
===================================================================
--- trunk/Master/tlpkg/TeXLive/TLTREE.pm 2018-08-31 00:23:50 UTC (rev 48519)
+++ trunk/Master/tlpkg/TeXLive/TLTREE.pm 2018-08-31 03:41:13 UTC (rev 48520)
@@ -82,6 +82,7 @@
chomp(@foo);
my $curcom = "";
+ my $rev = 0;
for my $l (@foo) {
if ($l eq "") {
$curcom = "";
@@ -118,8 +119,11 @@
# now reverse the order
for my $f (keys %files) {
my $n = - ( $files{$f} - $rev ) + 1;
+ # special case for TL: remove Master if it is present
+ $f =~ s!^Master/!!;
push @lines, " $n $n dummy $f"
}
+ # debug(join("\n", @lines));
# TODO needs to be made better!
$self->{'revision'} = $rev;
$self->_initialize_lines(@lines);
More information about the tex-live-commits
mailing list