diff options
author | Marc Espie <espie@cvs.openbsd.org> | 2007-05-31 13:11:22 +0000 |
---|---|---|
committer | Marc Espie <espie@cvs.openbsd.org> | 2007-05-31 13:11:22 +0000 |
commit | e8fb2eb24a70012668c9d908a26b202fda312408 (patch) | |
tree | cadbd9e03fcd957242aa9ff1eefd4a22512c4e21 /usr.sbin/pkg_add/OpenBSD/PackageInfo.pm | |
parent | 004fc400b75c97bbf4d738b5f320941f37a32db8 (diff) |
oops, move realname up so that ::Sample sees it too.
remove last traces of MODULEs.
Diffstat (limited to 'usr.sbin/pkg_add/OpenBSD/PackageInfo.pm')
-rw-r--r-- | usr.sbin/pkg_add/OpenBSD/PackageInfo.pm | 9 |
1 files changed, 3 insertions, 6 deletions
diff --git a/usr.sbin/pkg_add/OpenBSD/PackageInfo.pm b/usr.sbin/pkg_add/OpenBSD/PackageInfo.pm index e997f254022..be7fff8d12b 100644 --- a/usr.sbin/pkg_add/OpenBSD/PackageInfo.pm +++ b/usr.sbin/pkg_add/OpenBSD/PackageInfo.pm @@ -1,5 +1,5 @@ # ex:ts=8 sw=4: -# $OpenBSD: PackageInfo.pm,v 1.30 2007/05/30 16:32:14 espie Exp $ +# $OpenBSD: PackageInfo.pm,v 1.31 2007/05/31 13:11:21 espie Exp $ # # Copyright (c) 2003-2007 Marc Espie <espie@openbsd.org> # @@ -21,14 +21,13 @@ package OpenBSD::PackageInfo; our @ISA=qw(Exporter); our @EXPORT=qw(installed_packages installed_info installed_name info_names is_info_name installed_stems lock_db unlock_db - add_installed delete_installed is_installed borked_package CONTENTS COMMENT DESC INSTALL DEINSTALL REQUIRE MODULE + add_installed delete_installed is_installed borked_package CONTENTS COMMENT DESC INSTALL DEINSTALL REQUIRE REQUIRED_BY REQUIRING DISPLAY UNDISPLAY MTREE_DIRS); use OpenBSD::PackageName; use constant { CONTENTS => '+CONTENTS', COMMENT => '+COMMENT', - MODULE => '+MODULE.pm' , DESC => '+DESC', INSTALL => '+INSTALL', DEINSTALL => '+DEINSTALL', @@ -44,15 +43,13 @@ my $pkg_db = $ENV{"PKG_DBDIR"} || '/var/db/pkg'; my ($list, $stemlist); -# XXX note that REQUIRE occurs before INSTALL/DESINSTALL. -our @info = (CONTENTS, COMMENT, DESC, REQUIRE, INSTALL, DEINSTALL, REQUIRED_BY, REQUIRING, DISPLAY, UNDISPLAY, MTREE_DIRS, MODULE); +our @info = (CONTENTS, COMMENT, DESC, REQUIRE, INSTALL, DEINSTALL, REQUIRED_BY, REQUIRING, DISPLAY, UNDISPLAY, MTREE_DIRS); our %info = (); for my $i (@info) { my $j = $i; $j =~ s/\+/F/; $info{$i} = $j; - $info{'+MODULE.pm'} = 'FMODULE'; } sub _init_list |