me/guix
Archived
1
0
Fork 0
Code Activity

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
Show stats Download patch file Download diff file Expand all files Collapse all files

21
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
(lambda* (#:key inputs #:allow-other-keys) (add-before 'check 'check-setup
(substitute* "testing/functional/__init__.py" (lambda* (#:key inputs #:allow-other-keys)
(("/bin/sh") (which "sh"))) (substitute* "testing/functional/__init__.py"
(setenv "HOME" (getcwd)) ;gpg needs to write to $HOME (("/bin/sh") (which "sh")))
(setenv "TZDIR" ;some timestamp checks need TZDIR (setenv "HOME" (getcwd)) ;gpg needs to write to $HOME
(string-append (assoc-ref inputs "tzdata") (setenv "TZDIR" ;some timestamp checks need TZDIR
"/share/zoneinfo"))) (string-append (assoc-ref inputs "tzdata")
%standard-phases))) "/share/zoneinfo"))
#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