summaryrefslogtreecommitdiff
path: root/Master/tlpkg/TeXLive/TLTREE.pm
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2008-03-08 17:30:21 +0000
committerKarl Berry <karl@freefriends.org>2008-03-08 17:30:21 +0000
commitab7d45da5d0e88a2e22619991427c55e142b5557 (patch)
tree6a9d45d9c839d3a983fb264c3448d2ef9381badd /Master/tlpkg/TeXLive/TLTREE.pm
parent94ded7cf33376ecbfa603051b5f0886d26d0a57d (diff)
only the first level under bin/, though.
git-svn-id: svn://tug.org/texlive/trunk@6888 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 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;