jolheiser/nixpkgs
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Merge pull request #70400 from stigtsp/package/perl-device-mac-init

Browse Source 
perlPackages.DeviceMAC: init at 1.00
This commit is contained in:
Renaud 2019-10-14 14:36:59 +02:00 committed by GitHub
commit 581ada4270
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
2 changed files with 44 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
pkgs/development/perl-modules/Device-OUI-1.04-hash.patch Normal file
View File

@ -0,0 +1,11 @@
--- Device-OUI-1.04/lib/Device/OUI.pm.orig 2009-03-07 02:23:17.000000000 +0000
+++ Device-OUI-1.04/lib/Device/OUI.pm 2016-08-09 08:19:00.642799675 +0100
@@ -54,7 +54,7 @@
for my $x ( keys %hash ) {
if ( not defined $hash{ $x } ) { $hash{ $x } = '' }
}
- return $handle->{ $oui } = join( "\0", %hash );
+ return $handle->{ $oui } = join( "\0", map {$_,$hash{$_}} sort keys %hash );
} elsif ( my $x = $handle->{ $oui } ) {
return { split( "\0", $x ) };
}

33
pkgs/top-level/perl-packages.nix
View File

@ -4592,6 +4592,39 @@ let
};
};
DeviceMAC = buildPerlPackage {
pname = "Device-MAC";
version = "1.00";
src = fetchurl {
url = "mirror://cpan/authors/id/J/JA/JASONK/Device-MAC-1.00.tar.gz";
sha256 = "c42182a9a8489a314cbfe6e1c8452f32b3b626aa6c89fee1d8925e6dfb64fad5";
};
buildInputs = [ TestMost TestDifferences TestException TestWarn TestDeep ];
propagatedBuildInputs = [ DeviceOUI Moose ];
meta = {
description = "Handle hardware MAC Addresses (EUI-48 and EUI-64)";
license = with stdenv.lib.licenses; [ artistic1 gpl1Plus ];
maintainers = [ maintainers.sgo ];
};
};
DeviceOUI = buildPerlPackage {
pname = "Device-OUI";
version = "1.04";
src = fetchurl {
url = "mirror://cpan/authors/id/J/JA/JASONK/Device-OUI-1.04.tar.gz";
sha256 = "4b367e61b1fadde77fb6fb729f3cd5acd1d46e71218d96f406bcba38d43b4bef";
};
buildInputs = [ TestException ];
patches = [ ../development/perl-modules/Device-OUI-1.04-hash.patch ];
propagatedBuildInputs = [ ClassAccessorGrouped SubExporter LWP ];
meta = {
description = "Resolve an Organizationally Unique Identifier";
license = with stdenv.lib.licenses; [ artistic1 gpl1Plus ];
maintainers = [ maintainers.sgo ];
};
};
DBDMock = buildPerlModule {
pname = "DBD-Mock";
version = "1.45";