ryan77627/guix
1
0
Fork 0
mirror of https://git.in.rschanz.org/ryan77627/guix.git synced 2024-12-26 14:28:15 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

gnu: darcs: Update to 2.14.1.

Browse source 
* gnu/packages/version-control.scm (darcs): Update to 2.14.1.
[arguments]: Add patch-sh phase. Enable tests.
This commit is contained in:
Arun Isaac 2018-08-23 15:51:43 +05:30
parent d3c7e70858
commit 72816ebed2
No known key found for this signature in database
GPG key ID: 2E25EE8B61802BB3
1 changed files with 11 additions and 9 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

20
gnu/packages/version-control.scm
View file

@ -21,6 +21,7 @@
;;; Copyright © 2018 Sou Bunnbu <iyzsong@member.fsf.org>
;;; Copyright © 2018 Christopher Baines <mail@cbaines.net>
;;; Copyright © 2018 Timothy Sample <samplet@ngyro.com>
;;; Copyright © 2018 Arun Isaac <arunisaac@systemreboot.net>
;;;
;;; This file is part of GNU Guix.
;;;
@ -1779,7 +1780,7 @@ (define-public stagit
(define-public darcs
(package
(name "darcs")
(version "2.12.5")
(version "2.14.1")
(source
(origin
(method url-fetch)
@ -1787,7 +1788,7 @@ (define-public darcs
"darcs-" version ".tar.gz"))
(sha256
(base32
"0lrm0sal5pl453mkqn8b9fc9l7lwinc140iqihya9g17bk408nrm"))
"0dfd6bp2wy0aabxx7l93gi3dmq21j970cds424xdy1mgmjcvrpb1"))
(modules '((guix build utils)))
;; Remove time-dependent code for reproducibility.
(snippet
@ -1795,18 +1796,19 @@ (define-public darcs
(substitute* "darcs/darcs.hs"
(("__DATE__") "\"1970-01-01\"")
(("__TIME__") "\"00:00:00\""))
(substitute* "src/impossible.h"
(("__DATE__") "\"\"")
(("__TIME__") "\"\""))
#t))))
(build-system haskell-build-system)
(arguments
`(#:configure-flags '("-fpkgconfig" "-fcurl" "-flibiconv" "-fthreaded"
"-fnetwork-uri" "-fhttp" "--flag=executable"
"--flag=library"
"--allow-newer=shelly")
;; FIXME: darcs is not compatible with the latest QuickCheck
#:tests? #f))
"--flag=library")
#:phases
(modify-phases %standard-phases
(add-after 'patch-source-shebangs 'patch-sh
(lambda _
(substitute* "tests/issue538.sh"
(("/bin/sh") (which "sh")))
#t)))))
(inputs
`(("ghc-cmdargs" ,ghc-cmdargs)
("ghc-split" ,ghc-split)