diff options
author | Marc Espie <espie@cvs.openbsd.org> | 2004-11-11 23:00:34 +0000 |
---|---|---|
committer | Marc Espie <espie@cvs.openbsd.org> | 2004-11-11 23:00:34 +0000 |
commit | 8193093476cdc649bb73992f4091f5b35d2fd73c (patch) | |
tree | 31e142c84a8c468d9661a21c178af54a81cf39c1 /usr.sbin | |
parent | cc161e225861b5b1679e4e6bea85b8bedf7187cc (diff) |
use from_installation and forget.
Diffstat (limited to 'usr.sbin')
-rw-r--r-- | usr.sbin/pkg_add/pkg_enquire | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/usr.sbin/pkg_add/pkg_enquire b/usr.sbin/pkg_add/pkg_enquire index e84d0f0b7a7..f42d1106dc3 100644 --- a/usr.sbin/pkg_add/pkg_enquire +++ b/usr.sbin/pkg_add/pkg_enquire @@ -1,6 +1,6 @@ #! /usr/bin/perl # ex:ts=8 sw=4: -# $OpenBSD: pkg_enquire,v 1.2 2004/08/06 07:51:17 espie Exp $ +# $OpenBSD: pkg_enquire,v 1.3 2004/11/11 23:00:33 espie Exp $ # # Copyright (c) 2003-2004 Marc Espie <espie@openbsd.org> # @@ -32,7 +32,8 @@ for my $i (@ARGV) { } for my $pkg (installed_packages()) { - my $plist = OpenBSD::PackingList->fromfile(installed_info($pkg).CONTENTS, \&OpenBSD::PackingList::FilesOnly); + my $plist = OpenBSD::PackingList->from_installation($pkg, + \&OpenBSD::PackingList::FilesOnly); print "$pkg...\n"; for my $item (@{$plist->{items}}) { next unless $item->IsFile(); @@ -42,6 +43,7 @@ for my $pkg (installed_packages()) { $searched--; } } + $plist->forget(); } for my $i (@ARGV) { if (defined $found{$i}) { |