= Rutger Helling transcribed 6.1K bytes:

Hey Guix,

this patch adds wget2.

From 9e0271973c6c0c762cf4bcee987432864bc3e1d8 Mon Sep = 17 00:00:00 2001
From: Rutger Helling <rhelling@mykolab.com>
Date: Tue, 14 Nov 2017 14:5= 8:18 +0100
Subject: [PATCH] gnu: wget: Add wget2.

* gnu/= packages/wget.scm (wget2): New variable.
---
gnu/packages= /wget.scm | 61 +++++++++++++++++++++++++++++++++++++++++++++++++++
&n= bsp;1 file changed, 61 insertions(+)

diff --git a/gnu/packages= /wget.scm b/gnu/packages/wget.scm
index bfcfcad23..6249f9eb3 100644 --- a/gnu/packages/wget.scm
+++ b/gnu/packages/wget.scm
@@= -2,6 +2,7 @@
;;; Copyright © 2012 Nikita Karetnikov <<= a href=3D"mailto:nikita@karetnikov.org">nikita@karetnikov.org>
= ;;; Copyright © 2014, 2015, 2017 Ludovic Courtès <ludo@gnu.org>
;;; Copyright= © 2016, 2017 Efraim Flashner <efraim@flashner.co.il>
+;;; Copyright © 2017 Rutge= r Helling <rhelling@mykolab.com<= /a>>
;;;
;;; This file is part of GNU Guix.
;;;
@@ -21,15 +22,23 @@
(define-module (gnu packa= ges wget)
   #:use-module (guix licenses)
=   #:use-module (gnu packages)
+ #:use-module (gnu pac= kages autotools)
+ #:use-module (gnu packages base)
= ;  #:use-module (gnu packages compression)
+ #:use-mo= dule (gnu packages documentation)
+ #:use-module (gnu packages = flex)
+ #:use-module (gnu packages gettext)
+ #:use= -module (gnu packages gnunet)
   #:use-module (gnu pac= kages libidn)
   #:use-module (gnu packages python)    #:use-module (gnu packages perl)
  &n= bsp;#:use-module (gnu packages web)
+ #:use-module (gnu package= s pcre)
   #:use-module (gnu packages pkg-config)
   #:use-module (gnu packages tls)
   = ;#:use-module (guix packages)
   #:use-module (guix do= wnload)
+ #:use-module (guix git-download)
  &n= bsp;#:use-module (guix build-system gnu))

(define-= public wget
@@ -112,3 +121,55 @@ in downloaded documents to relative = links.")
      "@code{wgetpaste} is an = extremely simple command-line interface to various
online paste= bin services.")
     (license public-domain)= ))
+
+(define-public wget2
+ (package
+ = ; (name "wget2")
+   (version "1.0.0")
+ &= nbsp;(source
+    (origin
+    &n= bsp;(method git-fetch)
+     (uri (git-reference<= br /> +           (url "<= a href=3D"https://github.com/rockdaboot/wget2" target=3D"_blank" rel=3D"noo= pener noreferrer">https://github.com/rockdaboot/wget2")
+ &= nbsp;        (commit "b45709d3d2171= 4135ce79df6abbdcb704684063d")
+       &= nbsp;   (recursive? #t))) ;; Needed for 'gnulib' git submodu= le.
+     (file-name (string-append name "-" vers= ion "-checkout"))
+     (sha256
+ &nb= sp;   (base32
+       "0= ww84wwzmpyylkz8rnb6nk6f7x040132z81x52w7rjhk68p9mm24"))))
+ &nbs= p;(build-system gnu-build-system)
+   (arguments
+ &n= bsp;  `(#:phases (modify-phases %standard-phases
+ &n= bsp;   (add-after 'unpack 'bootstrap
+   &nb= sp;    (lambda _
+      =     ;; Make sure all the files are writable so that ./b= ootstrap
+          ;; c= an proceed.
+          (= for-each (lambda (file)
+        &= nbsp;           &nbs= p; (chmod file #o755))
+       &nb= sp;            =   (find-files "."))
+       &= nbsp;  (substitute* "./gnulib/gnulib-tool.py"
+   = ;            &n= bsp;       (("/usr/bin/python") (which "= python3")))
+          (= zero? (system* "sh" "./bootstrap"
+      &nb= sp;            =        "--gnulib-srcdir=3Dgnulib"
= +             &= nbsp;           &nbs= p;"--no-git")))))))
+   (inputs `(("autoconf", autoconf) +            &nb= sp;("automake", automake)
+        = ;     ("doxygen", doxygen)
+   &nb= sp;         ("flex", flex)
+            &nbs= p;("gettext", gettext-minimal)
+       =       ("gnutls", gnutls)

As libmicrohttpd is build with GnuTLS with DANE ('gnutls/dane' packa= ge),
wouldn't it make sense to build this with gnutls/dane aswell?
Or: In my opinion the gnuntls/dane package I've added should be = merged
into gnutls unless someone disagrees. This way DANE functional= ity is
included by default.

+         &nbs= p;   ("libiconv", libiconv)
+     =         ("libidn2", libidn2)
= +             (= "libmicrohttpd", libmicrohttpd)
+       = ;      ("libpsl", libpsl)
+   = ;          ("libtool", li= btool)
+           =   ("pcre2", pcre2)
+       &n= bsp;     ("python", python)))
+   = ;; TODO: Add libbrotlidec, libnghttp2.
+   (native-inputs `= (("pkg-config", pkg-config)))
+   (home-page "https://github.com/rockdaboot/wget2")
+   (synops= is "Successor of GNU Wget")
+   (description "GNU Wget2 is = the successor of GNU Wget, a file and recursive
+website downloader= =2E Designed and written from scratch it wraps around libwget,
= +that provides the basic functions needed by a web client.")
+ = (license (list gpl3+ lgpl3+))))
-- 2.15.0