02/04: gnu: Add perl-net-dns-resolver-mock.

[guix-commits]

roptat pushed a commit to branch master
in repository guix.

commit ac629e625cb0a07cfef82d23a9342bba3f1f8029
Author: Julien Lepiller <address@hidden>
Date:   Thu Jul 25 20:40:30 2019 +0200

    gnu: Add perl-net-dns-resolver-mock.
    
    * gnu/packages/networking.scm (perl-net-dns-resolver-mock): New
    variable.
---
 gnu/packages/networking.scm | 23 +++++++++++++++++++++++
 1 file changed, 23 insertions(+)

diff --git a/gnu/packages/networking.scm b/gnu/packages/networking.scm
index bc252fc..3c65630 100644
--- a/gnu/packages/networking.scm
+++ b/gnu/packages/networking.scm
@@ -28,6 +28,7 @@
 ;;; Copyright © 2018 Pierre Neidhardt <address@hidden>
 ;;; Copyright © 2019 Maxim Cournoyer <address@hidden>
 ;;; Copyright © 2019 Vasile Dumitrascu <address@hidden>
+;;; Copyright © 2019 Julien Lepiller <address@hidden>
 ;;;
 ;;; This file is part of GNU Guix.
 ;;;
@@ -1081,6 +1082,28 @@ definitions and structure manipulators for Perl.")
 offline emulation of DNS.")
   (license license:perl-license)))
 
+(define-public perl-net-dns-resolver-mock
+  (package
+    (name "perl-net-dns-resolver-mock")
+    (version "1.20171219")
+    (source (origin
+              (method url-fetch)
+              (uri (string-append
+                     "mirror://cpan/authors/id/M/MB/MBRADSHAW/"
+                     "Net-DNS-Resolver-Mock-" version ".tar.gz"))
+              (sha256
+               (base32
+                "0m3rxpkv1b9121srvbqkrgzg4m8mnydiydqv34in1i1ixwrl6jn9"))))
+    (build-system perl-build-system)
+    (propagated-inputs
+     `(("perl-net-dns" ,perl-net-dns)))
+    (home-page "https://metacpan.org/release/Net-DNS-Resolver-Mock";)
+    (synopsis "Mock a DNS Resolver object for testing")
+    (description "Net::DNS::Resolver::Mock is a a subclass of
+@code{Net::DNS::Resolver} which parses a zonefile for it's data source.  It is
+primarily for use in testing.")
+    (license license:perl-license)))
+
 (define-public perl-netaddr-ip
  (package
   (name "perl-netaddr-ip")