[arch-commits] Commit in perl-authen-radius/repos (3 files)

[Felix Yan]

    Date: Tuesday, July 7, 2020 @ 16:24:43
  Author: felixonmars
Revision: 659238

archrelease: copy trunk to community-staging-any

Added:
  perl-authen-radius/repos/community-staging-any/
  perl-authen-radius/repos/community-staging-any/PKGBUILD
    (from rev 659236, perl-authen-radius/trunk/PKGBUILD)
  perl-authen-radius/repos/community-staging-any/undef-warn-fix.patch
    (from rev 659236, perl-authen-radius/trunk/undef-warn-fix.patch)

----------------------+
 PKGBUILD             |   34 ++++++++++++++++++++++++++++++++++
 undef-warn-fix.patch |   14 ++++++++++++++
 2 files changed, 48 insertions(+)

Copied: perl-authen-radius/repos/community-staging-any/PKGBUILD (from rev 659236, perl-authen-radius/trunk/PKGBUILD)
===================================================================
--- community-staging-any/PKGBUILD	                        (rev 0)
+++ community-staging-any/PKGBUILD	2020-07-07 16:24:43 UTC (rev 659238)
@@ -0,0 +1,34 @@
+# Maintainer: Sergej Pupykin <pupykin.s+arch at gmail.com>
+
+pkgname=perl-authen-radius
+pkgver=0.27
+pkgrel=2
+pkgdesc="perl radius client"
+arch=('any')
+url="https://search.cpan.org/dist/Authen-Radius/"
+#url="https://search.cpan.org/dist/RadiusPerl"
+license=('GPL' 'PerlArtistic')
+depends=('perl-data-hexdump>=0.02')
+options=('!emptydirs')
+source=(https://search.cpan.org/CPAN/authors/id/P/PO/PORTAONE/Authen-Radius-$pkgver.tar.gz
+	undef-warn-fix.patch)
+sha256sums=('e5a3052fe46dc38424c1947da92e623e8996216f97bd7be72221eb6c5f7c09f8'
+            '61357e54d3d6e9e609aebd3dcd22ea84fb49bce336fff87b2926ceccffc73bed')
+
+prepare() {
+  cd  "$srcdir"/Authen-Radius-$pkgver
+#  patch -p1 <"$srcdir"/undef-warn-fix.patch
+}
+
+build() {
+  cd  "$srcdir"/Authen-Radius-$pkgver
+  PERL_MM_USE_DEFAULT=1 perl Makefile.PL INSTALLDIRS=vendor
+  make
+}
+
+package() {
+  cd  "$srcdir"/Authen-Radius-$pkgver
+  make install DESTDIR="$pkgdir"
+  find "$pkgdir" -name '.packlist' -delete
+  find "$pkgdir" -name '*.pod' -delete
+}

Copied: perl-authen-radius/repos/community-staging-any/undef-warn-fix.patch (from rev 659236, perl-authen-radius/trunk/undef-warn-fix.patch)
===================================================================
--- community-staging-any/undef-warn-fix.patch	                        (rev 0)
+++ community-staging-any/undef-warn-fix.patch	2020-07-07 16:24:43 UTC (rev 659238)
@@ -0,0 +1,14 @@
+diff --git a/Radius.pm b/Radius.pm
+index db56f23..b88db32 100644
+--- a/Radius.pm
++++ b/Radius.pm
+@@ -436,7 +436,8 @@ sub vendorID ($) {
+ 	return defined $dict_vendor_name{ $attr->{'Vendor'} }{'id'} ? $dict_vendor_name{ $attr->{'Vendor'} }{'id'} : int($attr->{'Vendor'});
+     } else {
+ 	# look up vendor by attribute name
+-	my $vendor_name = $dict_name{$attr->{'Name'}}{'vendor'};
++	my $vendor_name = defined ($dict_name{$attr->{'Name'}}{'vendor'}) ?
++	    $dict_name{$attr->{'Name'}}{'vendor'} : 'not defined';
+ 	my $vendor_id = defined ($dict_vendor_name{$vendor_name}{'id'}) ?
+ 	    $dict_vendor_name{$vendor_name}{'id'} : 'not defined';
+ 	return $vendor_id;