summaryrefslogtreecommitdiff
path: root/Master/tlpkg/TeXLive/TLTREE.pm
diff options
context:
space:
mode:
authorNorbert Preining <preining@logic.at>2007-06-22 06:56:24 +0000
committerNorbert Preining <preining@logic.at>2007-06-22 06:56:24 +0000
commit6e8cff94023ff7e3c4d700d0d8acd836cd7563c5 (patch)
tree975e1405907be3ee1437bd78128f12d0cdb11158 /Master/tlpkg/TeXLive/TLTREE.pm
parent3436f00ff54d1f44a0b8f96fd3c563e53861a6f2 (diff)
TLTREE: if a file does not have a revision attached (svn commit has
not been done) then the revision value is set to 1. git-svn-id: svn://tug.org/texlive/trunk@4485 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/tlpkg/TeXLive/TLTREE.pm')
-rw-r--r--Master/tlpkg/TeXLive/TLTREE.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/Master/tlpkg/TeXLive/TLTREE.pm b/Master/tlpkg/TeXLive/TLTREE.pm
index 8b508bef634..39c650665b6 100644
--- a/Master/tlpkg/TeXLive/TLTREE.pm
+++ b/Master/tlpkg/TeXLive/TLTREE.pm
@@ -64,7 +64,7 @@ sub _initialize_lines {
chomp($l);
next if ($l =~ /^\?/); # ignore files not under version control
if ($l =~ /^(.)(.)(.)(.)(.)(.)..\s*(\d+)\s+([\d\?]+)\s+([\w\?]+)\s+(.+)$/) {
- my $lastchanged = $8;
+ my $lastchanged = ($8 eq "?" ? 1 : $8);
my $entry = "$10";
next if -d $entry; # TODO: what to do with links???
$self->{'_allfiles'}{$entry}{'lastchangedrev'} = $lastchanged;