diff options
author | 2005-09-19 10:15:01 +0000 | |
---|---|---|
committer | 2005-09-19 10:15:01 +0000 | |
commit | 605cc7af14fd8af0826d68739985a9b6d73c8b73 (patch) | |
tree | 12b5365ccd80d694fea434d47c636679a681a7a1 | |
parent | OpenBSD::PackingList is in section 3p. (diff) | |
download | wireguard-openbsd-605cc7af14fd8af0826d68739985a9b6d73c8b73.tar.xz wireguard-openbsd-605cc7af14fd8af0826d68739985a9b6d73c8b73.zip |
fix PackageRepository::Installed().
let grabPlist finish closing what it opened.
-rw-r--r-- | usr.sbin/pkg_add/OpenBSD/PackageLocator.pm | 9 |
1 files changed, 8 insertions, 1 deletions
diff --git a/usr.sbin/pkg_add/OpenBSD/PackageLocator.pm b/usr.sbin/pkg_add/OpenBSD/PackageLocator.pm index 49f41a853ef..ceb8202898e 100644 --- a/usr.sbin/pkg_add/OpenBSD/PackageLocator.pm +++ b/usr.sbin/pkg_add/OpenBSD/PackageLocator.pm @@ -1,5 +1,5 @@ # ex:ts=8 sw=4: -# $OpenBSD: PackageLocator.pm,v 1.39 2005/09/19 09:49:51 espie Exp $ +# $OpenBSD: PackageLocator.pm,v 1.40 2005/09/19 10:15:01 espie Exp $ # # Copyright (c) 2003-2004 Marc Espie <espie@openbsd.org> # @@ -141,8 +141,14 @@ sub grabPlist } package OpenBSD::PackageRepository::Installed; +our @ISA=qw(OpenBSD::PackageRepository); use OpenBSD::PackageInfo; +sub new +{ + bless {}, shift; +} + sub find { my ($repository, $name, $arch, $srcpath) = @_; @@ -628,6 +634,7 @@ sub grabPlist if (defined $pkg) { my $plist = $self->plist($code); $pkg->wipe_info(); + $pkg->close(); return $plist; } else { return undef; |