cpet/openbsd-ports
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

allow us to ask for indexed/non indexed variables

Browse Source
This commit is contained in:
espie 2019-01-14 18:37:15 +00:00
parent 8642cc437b
commit 1f4ec730cf
1 changed files with 13 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
databases/sqlports/files/Info.pm
View File

@ -1,4 +1,4 @@
# $OpenBSD: Info.pm,v 1.28 2019/01/11 21:52:25 espie Exp $
# $OpenBSD: Info.pm,v 1.29 2019/01/14 18:37:15 espie Exp $
#
# Copyright (c) 2012 Marc Espie <espie@openbsd.org>
#
@ -115,8 +115,20 @@ our $vars = {
MISSING_FILES => 'IgnoredVar',
};
my @indexed = qw(FULLPKGNAME RUN_DEPENDS LIB_DEPENDS IGNORE
COMMENT PKGNAME ONLY_FOR_ARCHS NOT_FOR_ARCHS PKGSPEC PKGSTEM PREFIX
PERMIT_PACKAGE_FTP PERMIT_PACKAGE_CDROM WANTLIB CATEGORIES DESCR
EPOCH REVISION STATIC_PLIST PKG_ARCH);
my $indexed = {map {($_, 1)} @indexed};
our $unknown = {};
sub is_indexed
{
my ($class, $name) = @_;
return $indexed->{$name};
}
sub new
{
my ($class, $p) = @_;