161/182: gnu: Remove monero-miniupnpc.

[guix-commits]

kkebreau pushed a commit to branch wip-gnome-updates
in repository guix.

commit 61be52c0c1f7b08d938e9bb3246ef80635e3eb47
Author: Guillaume Le Vaillant <address@hidden>
Date:   Sat Nov 9 11:54:52 2019 +0100

    gnu: Remove monero-miniupnpc.
    
    This package was only needed for an older version of monero; nothing else
    depends on it.
    
    * gnu/packages/upnp.scm (monero-miniupnpc): Remove variable.
    
    Signed-off-by: Marius Bakke <address@hidden>
---
 gnu/packages/upnp.scm | 43 -------------------------------------------
 1 file changed, 43 deletions(-)

diff --git a/gnu/packages/upnp.scm b/gnu/packages/upnp.scm
index d78ffdd..390a338 100644
--- a/gnu/packages/upnp.scm
+++ b/gnu/packages/upnp.scm
@@ -89,49 +89,6 @@ over IRC, instant messaging, network games, and most server 
software.")
     (license
      (x11-style "file://LICENSE" "See 'LICENSE' file in the distribution"))))
 
-(define-public monero-miniupnpc
-  ;; This package is the bundled version of miniupnpc used with monero.
-  ;; Monero-project has been maintaining its own version of the package since
-  ;; release 0.12.2.0.  It includes security fixes not included in upstream
-  ;; releases.
-  (let ((revision "0")
-        (commit "6a63f9954959119568fbc4af57d7b491b9428d87"))
-    (package
-      (inherit miniupnpc)
-      (name "miniupnpc-monero")
-      (version (string-append "2.1-monero-0.12.3.0-" revision "."
-                              (string-take commit 7)))
-      (source (origin
-                (method git-fetch)
-                (uri (git-reference
-                      (url "https://github.com/monero-project/miniupnp/";)
-                      (commit commit)))
-                (sha256
-                 (base32
-                  "0s67zcz978iapjlq30yy9dl8qda9xhrl3jdi5f99cnbglh5gy16a"))
-                (file-name (string-append name "-" version "-checkout"))
-                (modules '((guix build utils)))
-                (snippet
-                 '(begin
-                    ;; Delete miniupnp subprojects except for miniupnpc.
-                    (for-each
-                     delete-file-recursively
-                     '("minissdpd" "miniupnpc-async" "miniupnpc-libevent"
-                       "miniupnpd" ))
-                    #t))))
-      (arguments
-       (substitute-keyword-arguments (package-arguments miniupnpc)
-         ((#:phases phases)
-          `(modify-phases ,phases
-             (add-before 'build 'change-directory
-               (lambda _
-                 (chdir "miniupnpc")
-                 #t))
-             (add-after 'change-directory 'chmod-header-file
-               (lambda _
-                 (chmod "miniupnpc.h" #o644)
-                 #t)))))))))
-
 (define-public libupnp
   (package
     (name "libupnp")