me/guix
Archived
1
0
Fork 0
Code Activity

gnu: bitcoin-core: Reformat the package definition.

Browse source 
Change the indentation to match what Emacs does.

* gnu/packages/finance.scm (bitcoin-core): Change indentation of many lines.
This commit is contained in:
Christopher Baines 2020-05-11 18:31:07 +01:00
parent 1cc7d3404f
commit 8ba4d8a347
No known key found for this signature in database
GPG key ID: 5E28A33B0B84F577
1 changed files with 34 additions and 33 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

67
gnu/packages/finance.scm
View file

@ -104,14 +104,14 @@
(name "bitcoin-core") (name "bitcoin-core")
(version "0.19.1") (version "0.19.1")
(source (origin (source (origin
(method url-fetch) (method url-fetch)
(uri (uri
(string-append "https://bitcoincore.org/bin/bitcoin-core-" (string-append "https://bitcoincore.org/bin/bitcoin-core-"
version "/bitcoin-" version ".tar.gz")) version "/bitcoin-" version ".tar.gz"))
(sha256 (sha256
(base32 (base32
"1h3w7brc18145np920vy7j5ms5hym59hvr40swdjx34fbdaisngj")) "1h3w7brc18145np920vy7j5ms5hym59hvr40swdjx34fbdaisngj"))
(patches (search-patches "bitcoin-core-python-compat.patch")))) (patches (search-patches "bitcoin-core-python-compat.patch"))))
(build-system gnu-build-system) (build-system gnu-build-system)
(native-inputs (native-inputs
`(("pkg-config" ,pkg-config) `(("pkg-config" ,pkg-config)
@ -128,35 +128,36 @@
("qtbase" ,qtbase))) ("qtbase" ,qtbase)))
(arguments (arguments
`(#:configure-flags `(#:configure-flags
(list (list
;; Boost is not found unless specified manually. ;; Boost is not found unless specified manually.
(string-append "--with-boost=" (string-append "--with-boost="
(assoc-ref %build-inputs "boost")) (assoc-ref %build-inputs "boost"))
;; XXX: The configure script looks up Qt paths by ;; XXX: The configure script looks up Qt paths by
;; `pkg-config --variable=host_bins Qt5Core`, which fails to pick ;; `pkg-config --variable=host_bins Qt5Core`, which fails to pick
;; up executables residing in 'qttools', so we specify them here. ;; up executables residing in 'qttools', so we specify them here.
(string-append "ac_cv_path_LRELEASE=" (string-append "ac_cv_path_LRELEASE="
(assoc-ref %build-inputs "qttools") (assoc-ref %build-inputs "qttools")
"/bin/lrelease") "/bin/lrelease")
(string-append "ac_cv_path_LUPDATE=" (string-append "ac_cv_path_LUPDATE="
(assoc-ref %build-inputs "qttools") (assoc-ref %build-inputs "qttools")
"/bin/lupdate")) "/bin/lupdate"))
#:phases #:phases
(modify-phases %standard-phases (modify-phases %standard-phases
(add-before 'configure 'make-qt-deterministic (add-before 'configure 'make-qt-deterministic
(lambda _ (lambda _
;; Make Qt deterministic. ;; Make Qt deterministic.
(setenv "QT_RCC_SOURCE_DATE_OVERRIDE" "1") (setenv "QT_RCC_SOURCE_DATE_OVERRIDE" "1")
#t)) #t))
(add-before 'check 'set-home (add-before 'check 'set-home
(lambda _ (lambda _
(setenv "HOME" (getenv "TMPDIR")) ; tests write to $HOME (setenv "HOME" (getenv "TMPDIR")) ; tests write to $HOME
#t)) #t))
(add-after 'check 'check-functional (add-after 'check 'check-functional
(lambda _ (lambda _
(invoke "python3" "./test/functional/test_runner.py" (invoke
(string-append "--jobs=" (number->string (parallel-job-count)))) "python3" "./test/functional/test_runner.py"
#t))))) (string-append "--jobs=" (number->string (parallel-job-count))))
#t)))))
(home-page "https://bitcoin.org/en/") (home-page "https://bitcoin.org/en/")
(synopsis "Bitcoin peer-to-peer client") (synopsis "Bitcoin peer-to-peer client")
(description (description