summaryrefslogtreecommitdiff
path: root/usr.sbin/pkg_add/OpenBSD/PackingList.pm
diff options
context:
space:
mode:
authorMarc Espie <espie@cvs.openbsd.org>2007-05-30 16:32:15 +0000
committerMarc Espie <espie@cvs.openbsd.org>2007-05-30 16:32:15 +0000
commit3f253f61eca131987f384f2f3b77b6ac8a2262b2 (patch)
treec8d8c7773fefe2637903c688c7991eeb5f0d1a2d /usr.sbin/pkg_add/OpenBSD/PackingList.pm
parentd6d5b8a14834bcf7c886975434ca4e9a7df71b6c (diff)
simplify script handling a bit (they're going to disappear probably anyways).
Remove two passes visitors, we don't use them.
Diffstat (limited to 'usr.sbin/pkg_add/OpenBSD/PackingList.pm')
-rw-r--r--usr.sbin/pkg_add/OpenBSD/PackingList.pm25
1 files changed, 1 insertions, 24 deletions
diff --git a/usr.sbin/pkg_add/OpenBSD/PackingList.pm b/usr.sbin/pkg_add/OpenBSD/PackingList.pm
index 2a8e5f919e7..110f0ad9c0f 100644
--- a/usr.sbin/pkg_add/OpenBSD/PackingList.pm
+++ b/usr.sbin/pkg_add/OpenBSD/PackingList.pm
@@ -1,5 +1,5 @@
# ex:ts=8 sw=4:
-# $OpenBSD: PackingList.pm,v 1.71 2007/05/30 12:29:19 espie Exp $
+# $OpenBSD: PackingList.pm,v 1.72 2007/05/30 16:32:14 espie Exp $
#
# Copyright (c) 2003-2007 Marc Espie <espie@openbsd.org>
#
@@ -361,21 +361,6 @@ sub is_signed
return 0;
}
-{
- package OpenBSD::PackingList::Visitor;
- sub new
- {
- my $class = shift;
- bless {list=>[], pass=>1}, $class;
- }
-
- sub revisit
- {
- my ($self, $item) = @_;
- push(@{$self->{list}}, $item);
- }
-}
-
our @unique_categories =
(qw(name no-default-conflict manual-installation extrainfo localbase arch));
@@ -390,10 +375,6 @@ sub visit
{
my ($self, $method, @l) = @_;
- my $visitor = new OpenBSD::PackingList::Visitor;
-
- push(@l, $visitor);
-
if (defined $self->{cvstags}) {
for my $item (@{$self->{cvstags}}) {
$item->$method(@l);
@@ -415,10 +396,6 @@ sub visit
}
}
}
- $visitor->{pass} = 2;
- while (my $item = shift @{$visitor->{list}}) {
- $item->$method(@l);
- }
}
my $plist_cache = {};