diff options
| -rw-r--r-- | Master/tlpkg/TeXLive/TLTREE.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/Master/tlpkg/TeXLive/TLTREE.pm b/Master/tlpkg/TeXLive/TLTREE.pm index 068eaa804c6..db03091f66e 100644 --- a/Master/tlpkg/TeXLive/TLTREE.pm +++ b/Master/tlpkg/TeXLive/TLTREE.pm @@ -64,8 +64,8 @@ sub _initialize_lines { my $lastchanged = ($8 eq "?" ? 1 : $8); my $entry = "$10"; next if -d $entry; # TODO: what to do with links??? - # collect architectures - if ($entry =~ m,^bin/(.*)/tex.*$,) { + # collect architectures, assuming nothing is in bin/ but arch subdirs. + if ($entry =~ m,^bin/(.*)/,) { $archs{$1} = 1; } $self->{'_allfiles'}{$entry}{'lastchangedrev'} = $lastchanged; |