summaryrefslogtreecommitdiff
path: root/gnu/packages/networking.scm
diff options
context:
space:
mode:
authorJulien Lepiller <julien@lepiller.eu>2019-07-25 20:40:30 +0200
committerJulien Lepiller <julien@lepiller.eu>2019-07-25 21:27:22 +0200
commitac629e625cb0a07cfef82d23a9342bba3f1f8029 (patch)
treee8b2febc0ecf423904bcbba2b87e5c033c86f4ca /gnu/packages/networking.scm
parentf115d81748d8bedce1344c7e8c1d533ff9a4fe31 (diff)
downloadguix-patches-ac629e625cb0a07cfef82d23a9342bba3f1f8029.tar
guix-patches-ac629e625cb0a07cfef82d23a9342bba3f1f8029.tar.gz
gnu: Add perl-net-dns-resolver-mock.
* gnu/packages/networking.scm (perl-net-dns-resolver-mock): New variable.
Diffstat (limited to 'gnu/packages/networking.scm')
-rw-r--r--gnu/packages/networking.scm23
1 files changed, 23 insertions, 0 deletions
diff --git a/gnu/packages/networking.scm b/gnu/packages/networking.scm
index bc252fc591..3c65630a85 100644
--- a/gnu/packages/networking.scm
+++ b/gnu/packages/networking.scm
@@ -28,6 +28,7 @@
;;; Copyright © 2018 Pierre Neidhardt <mail@ambrevar.xyz>
;;; Copyright © 2019 Maxim Cournoyer <maxim.cournoyer@gmail.com>
;;; Copyright © 2019 Vasile Dumitrascu <va511e@yahoo.com>
+;;; Copyright © 2019 Julien Lepiller <julien@lepiller.eu>
;;;
;;; 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")