amaharaneko/guix-mirrors
1
1
Fork 0
mirror of https://codeberg.org/guix/guix.git synced 2025-10-02 02:15:12 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

gnu: duplicity: Use 'modify-phases' syntax.

Browse source 
* gnu/packages/backup.scm (duplicity)[arguments]: Use 'modify-phases'.
This commit is contained in:
Marius Bakke 2016-12-07 15:31:56 +01:00
parent ff55fe5599
commit ad04bd6b2a
No known key found for this signature in database
GPG key ID: A2A06DF2A33A54FA
1 changed files with 11 additions and 10 deletions
Download patch file Download diff file Expand all files Collapse all files

9
gnu/packages/backup.scm
View file

@ -78,16 +78,17 @@
(arguments (arguments
`(#:python ,python-2 ;setup assumes Python 2 `(#:python ,python-2 ;setup assumes Python 2
#:test-target "test" #:test-target "test"
#:phases (alist-cons-before #:phases
'check 'check-setup (modify-phases %standard-phases
(add-before 'check 'check-setup
(lambda* (#:key inputs #:allow-other-keys) (lambda* (#:key inputs #:allow-other-keys)
(substitute* "testing/functional/__init__.py" (substitute* "testing/functional/__init__.py"
(("/bin/sh") (which "sh"))) (("/bin/sh") (which "sh")))
(setenv "HOME" (getcwd)) ;gpg needs to write to $HOME (setenv "HOME" (getcwd)) ;gpg needs to write to $HOME
(setenv "TZDIR" ;some timestamp checks need TZDIR (setenv "TZDIR" ;some timestamp checks need TZDIR
(string-append (assoc-ref inputs "tzdata") (string-append (assoc-ref inputs "tzdata")
"/share/zoneinfo"))) "/share/zoneinfo"))
%standard-phases))) #t)))))
(home-page "http://duplicity.nongnu.org/index.html") (home-page "http://duplicity.nongnu.org/index.html")
(synopsis "Encrypted backup using rsync algorithm") (synopsis "Encrypted backup using rsync algorithm")
(description (description