diff options
| author | Tobias Geerinckx-Rice <me@tobias.gr> | 2016-11-24 18:48:15 +0100 |
|---|---|---|
| committer | Tobias Geerinckx-Rice <me@tobias.gr> | 2016-11-25 02:21:51 +0100 |
| commit | 5af82630feb1c6b65edc3dd14bf05d025b77b209 (patch) | |
| tree | 2c2251e94bef948edfb5b59f46fd9b536de968b0 | |
| parent | cdbdaf7b6b2c232bca5f2e84af3dca097a3f5ce6 (diff) | |
| download | guix-5af82630feb1c6b65edc3dd14bf05d025b77b209.tar.gz | |
gnu: miniupnpc: Use the correct ‘upnpc’ in ‘external-ip’.
* gnu/packages/upnp.scm (miniupnpc)[arguments]: Add ‘qualify-paths’ phase.
| -rw-r--r-- | gnu/packages/upnp.scm | 8 |
1 files changed, 7 insertions, 1 deletions
diff --git a/gnu/packages/upnp.scm b/gnu/packages/upnp.scm index 35bacc75f6..ffb671bf4c 100644 --- a/gnu/packages/upnp.scm +++ b/gnu/packages/upnp.scm @@ -1,5 +1,6 @@ ;;; GNU Guix --- Functional package management for GNU ;;; Copyright © 2014 Sree Harsha Totakura <sreeharsha@totakura.in> +;;; Copyright © 2016 Tobias Geerinckx-Rice <me@tobias.gr> ;;; ;;; This file is part of GNU Guix. ;;; @@ -55,7 +56,12 @@ (assoc-ref %outputs "out") "/lib")) #:phases (modify-phases %standard-phases - (delete 'configure)))) + (delete 'configure) + (add-before 'install 'qualify-paths + (lambda* (#:key outputs #:allow-other-keys) + (substitute* "external-ip.sh" + (("upnpc") + (string-append (assoc-ref outputs "out") "/bin/upnpc")))))))) (home-page "http://miniupnp.free.fr/") (synopsis "Library implementing the client side UPnP protocol") (description |