From ab7d45da5d0e88a2e22619991427c55e142b5557 Mon Sep 17 00:00:00 2001 From: Karl Berry Date: Sat, 8 Mar 2008 17:30:21 +0000 Subject: only the first level under bin/, though. git-svn-id: svn://tug.org/texlive/trunk@6888 c570f23f-e606-0410-a88d-b1316a301751 --- Master/tlpkg/TeXLive/TLTREE.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'Master/tlpkg/TeXLive/TLTREE.pm') diff --git a/Master/tlpkg/TeXLive/TLTREE.pm b/Master/tlpkg/TeXLive/TLTREE.pm index db03091f66e..b47e98813d9 100644 --- a/Master/tlpkg/TeXLive/TLTREE.pm +++ b/Master/tlpkg/TeXLive/TLTREE.pm @@ -65,7 +65,7 @@ sub _initialize_lines { my $entry = "$10"; next if -d $entry; # TODO: what to do with links??? # collect architectures, assuming nothing is in bin/ but arch subdirs. - if ($entry =~ m,^bin/(.*)/,) { + if ($entry =~ m,^bin/([^/*)/,) { $archs{$1} = 1; } $self->{'_allfiles'}{$entry}{'lastchangedrev'} = $lastchanged; -- cgit v1.2.3