diff options
author | rillig <rillig@pkgsrc.org> | 2022-08-17 18:25:26 +0000 |
---|---|---|
committer | rillig <rillig@pkgsrc.org> | 2022-08-17 18:25:26 +0000 |
commit | 1db2e87fa6fbd38f80aa986ad8edb8cc298ac796 (patch) | |
tree | bcb0aabd9e19b0756c631708d4aafae5d502d8e7 /pkgtools/lintpkgsrc | |
parent | 3c3d69a8695123ecd459dbd783792391ca40fb0c (diff) | |
download | pkgsrc-1db2e87fa6fbd38f80aa986ad8edb8cc298ac796.tar.gz |
lintpkgsrc: cleanup: reduce indentation of parse_makefile_pkgsrc
Diffstat (limited to 'pkgtools/lintpkgsrc')
-rwxr-xr-x | pkgtools/lintpkgsrc/files/lintpkgsrc.pl | 77 |
1 files changed, 37 insertions, 40 deletions
diff --git a/pkgtools/lintpkgsrc/files/lintpkgsrc.pl b/pkgtools/lintpkgsrc/files/lintpkgsrc.pl index 4f8584878f9..e96fcde6568 100755 --- a/pkgtools/lintpkgsrc/files/lintpkgsrc.pl +++ b/pkgtools/lintpkgsrc/files/lintpkgsrc.pl @@ -1,5 +1,5 @@ #!@PERL5@ -# $NetBSD: lintpkgsrc.pl,v 1.112 2022/08/17 18:22:26 rillig Exp $ +# $NetBSD: lintpkgsrc.pl,v 1.113 2022/08/17 18:25:26 rillig Exp $ # Written by David Brownlee <abs@netbsd.org>. # @@ -988,58 +988,55 @@ sub parse_makefile_pkgsrc($file) { } } - if (defined $pkgname) { - $pkgname = canonicalize_pkgname($pkgname); + defined $pkgname or return (); - my $pkgrevision = $vars->{PKGREVISION}; - if (defined $pkgrevision && $pkgrevision !~ /^\s*$/) { - if ($pkgrevision =~ /^\$\{ (?: - _CVS_PKGVERSION | - _GIT_PKGVERSION_CMD | - _HG_PKGVERSION_CMD | - _SVN_PKGREVISION_CMD) :.* \}$ /x) { - # See wip/mk/*-package.mk. - } elsif ($pkgrevision =~ /\D/) { - print "\n"; - print "Bogus: PKGREVISION $pkgrevision (from $file)\n"; + $pkgname = canonicalize_pkgname($pkgname); - } elsif ($pkgrevision > 0) { - $pkgname .= "nb$pkgrevision"; - } + my $pkgrevision = $vars->{PKGREVISION}; + if (defined $pkgrevision && $pkgrevision !~ /^\s*$/) { + if ($pkgrevision =~ /^\$\{ (?: + _CVS_PKGVERSION | + _GIT_PKGVERSION_CMD | + _HG_PKGVERSION_CMD | + _SVN_PKGREVISION_CMD) :.* \}$ /x) { + # See wip/mk/*-package.mk. + } elsif ($pkgrevision =~ /\D/) { + print "\n"; + print "Bogus: PKGREVISION $pkgrevision (from $file)\n"; + + } elsif ($pkgrevision > 0) { + $pkgname .= "nb$pkgrevision"; } + } - if ($pkgname =~ /\$/) { - print "\nBogus: $pkgname (from $file)\n"; + if ($pkgname =~ /\$/) { + print "\nBogus: $pkgname (from $file)\n"; - } elsif ($pkgname =~ /(.*)-(\d.*)/) { - if (defined $pkgdata) { - my $pkgver = $pkgdata->add($1, $2); + } elsif ($pkgname =~ /(.*)-(\d.*)/) { + if (defined $pkgdata) { + my $pkgver = $pkgdata->add($1, $2); - debug("add $1 $2"); + debug("add $1 $2"); - foreach my $var (qw(DEPENDS RESTRICTED OSVERSION_SPECIFIC BROKEN)) { - $pkgver->var($var, $vars->{$var}); - } + foreach my $var (qw(DEPENDS RESTRICTED OSVERSION_SPECIFIC BROKEN)) { + $pkgver->var($var, $vars->{$var}); + } - if (defined $vars->{NO_BIN_ON_FTP}) { - $pkgver->var('RESTRICTED', 'NO_BIN_ON_FTP'); - } + if (defined $vars->{NO_BIN_ON_FTP}) { + $pkgver->var('RESTRICTED', 'NO_BIN_ON_FTP'); + } - if ($file =~ m:([^/]+/[^/]+)/Makefile$:) { - $pkgver->var('dir', $1); - } else { - $pkgver->var('dir', 'unknown'); - } + if ($file =~ m:([^/]+/[^/]+)/Makefile$:) { + $pkgver->var('dir', $1); + } else { + $pkgver->var('dir', 'unknown'); } - } else { - print "Cannot extract $pkgname version ($file)\n"; } - - return ($pkgname, $vars); - } else { - return (undef); + print "Cannot extract $pkgname version ($file)\n"; } + + ($pkgname, $vars); } |