diff options
| author | Karl Berry <karl@freefriends.org> | 2008-03-08 17:31:17 +0000 |
|---|---|---|
| committer | Karl Berry <karl@freefriends.org> | 2008-03-08 17:31:17 +0000 |
| commit | 1549ec60717da999592ae9443fad7dc5ea773822 (patch) | |
| tree | da3b53cf40b35d843a3a3cc221dd2fe5e672b862 | |
| parent | ab7d45da5d0e88a2e22619991427c55e142b5557 (diff) | |
missed ]
git-svn-id: svn://tug.org/texlive/trunk@6889 c570f23f-e606-0410-a88d-b1316a301751
| -rw-r--r-- | Master/tlpkg/TeXLive/TLTREE.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Master/tlpkg/TeXLive/TLTREE.pm b/Master/tlpkg/TeXLive/TLTREE.pm index b47e98813d9..ca79902c795 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; |