gnu: wgetpaste: Fix historical confusion.
* gnu/packages/wget.scm (wgetpaste)[arguments]: Fix the reversed substitution and clarify its purpose.master
parent
e071b0c940
commit
57ea4dfca1
|
@ -3,7 +3,7 @@
|
||||||
;;; Copyright © 2014, 2015, 2017, 2018 Ludovic Courtès <ludo@gnu.org>
|
;;; Copyright © 2014, 2015, 2017, 2018 Ludovic Courtès <ludo@gnu.org>
|
||||||
;;; Copyright © 2016, 2017, 2019, 2020 Efraim Flashner <efraim@flashner.co.il>
|
;;; Copyright © 2016, 2017, 2019, 2020 Efraim Flashner <efraim@flashner.co.il>
|
||||||
;;; Copyright © 2017 Rutger Helling <rhelling@mykolab.com>
|
;;; Copyright © 2017 Rutger Helling <rhelling@mykolab.com>
|
||||||
;;; Copyright © 2018, 2019 Tobias Geerinckx-Rice <me@tobias.gr>
|
;;; Copyright © 2018, 2019, 2020 Tobias Geerinckx-Rice <me@tobias.gr>
|
||||||
;;;
|
;;;
|
||||||
;;; This file is part of GNU Guix.
|
;;; This file is part of GNU Guix.
|
||||||
;;;
|
;;;
|
||||||
|
@ -94,12 +94,12 @@ in downloaded documents to relative links.")
|
||||||
(modify-phases %standard-phases
|
(modify-phases %standard-phases
|
||||||
(delete 'configure)
|
(delete 'configure)
|
||||||
(delete 'build)
|
(delete 'build)
|
||||||
(add-after 'unpack 'remove-dead-paste-site
|
(add-after 'unpack 'change-unfriendly-default
|
||||||
;; This phase is adaped from the following patch:
|
|
||||||
;; https://gitweb.gentoo.org/repo/gentoo.git/tree/app-text/wgetpaste/files/wgetpaste-remove-dead.patch
|
|
||||||
(lambda _
|
(lambda _
|
||||||
(substitute* "wgetpaste"
|
(substitute* "wgetpaste"
|
||||||
(("-bpaste") "-dpaste")) ; dpaste blocks tor users
|
;; dpaste blocks Tor users. Use a better default.
|
||||||
|
(("DEFAULT_SERVICE:-dpaste")
|
||||||
|
"DEFAULT_SERVICE-bpaste"))
|
||||||
#t))
|
#t))
|
||||||
(replace 'install
|
(replace 'install
|
||||||
(lambda* (#:key outputs #:allow-other-keys)
|
(lambda* (#:key outputs #:allow-other-keys)
|
||||||
|
|
Reference in New Issue