me/guix
Archived
1
0
Fork 0
Code Activity

gnu: libtorrent-rasterbar: Update to 1.2.15.

Browse source 
* gnu/packages/bittorrent.scm (libtorrent-rasterbar): Update to 1.2.15.
[arguments]: Add phase to adjust test timeout. Adjust custom 'check
phase to update faketime date and output debug information on test
failures.
This commit is contained in:
Efraim Flashner 2022-01-19 11:28:21 +02:00
parent 83d331437f
commit d625506295
No known key found for this signature in database
GPG key ID: 41AAE7DCCA3D8351
1 changed files with 11 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

15
gnu/packages/bittorrent.scm
View file

@ -422,7 +422,7 @@ and will take advantage of multiple processor cores where possible.")
(define-public libtorrent-rasterbar (define-public libtorrent-rasterbar
(package (package
(name "libtorrent-rasterbar") (name "libtorrent-rasterbar")
(version "1.2.14") (version "1.2.15")
(source (source
(origin (origin
(method url-fetch) (method url-fetch)
@ -431,13 +431,18 @@ and will take advantage of multiple processor cores where possible.")
"releases/download/v" version "/" "releases/download/v" version "/"
"libtorrent-rasterbar-" version ".tar.gz")) "libtorrent-rasterbar-" version ".tar.gz"))
(sha256 (sha256
(base32 "0gwm4w7337ykh5lfnspapnnz6a35g7yay3wnj126s8s5kcsvy9wy")))) (base32 "0jr1c876mvwbbbnav8ldcdm1l6z3g404jc5wp8z902jcd0w8dbf8"))))
(build-system cmake-build-system) (build-system cmake-build-system)
(arguments (arguments
`(#:configure-flags '("-Dpython-bindings=ON" `(#:configure-flags '("-Dpython-bindings=ON"
"-Dbuild_tests=ON") "-Dbuild_tests=ON")
#:phases #:phases
(modify-phases %standard-phases (modify-phases %standard-phases
(add-after 'unpack 'extend-test-timeout
(lambda _
(substitute* "test/test_remove_torrent.cpp"
;; Extend the test timeout from 3 seconds to 10.
(("i > 30") "i > 100"))))
(replace 'check (replace 'check
(lambda* (#:key tests? parallel-tests? #:allow-other-keys) (lambda* (#:key tests? parallel-tests? #:allow-other-keys)
(let ((disabled-tests (let ((disabled-tests
@ -448,12 +453,14 @@ and will take advantage of multiple processor cores where possible.")
;; expiry date. To ensure succesful builds in the future, ;; expiry date. To ensure succesful builds in the future,
;; fake the time to be roughly that of the release. ;; fake the time to be roughly that of the release.
(setenv "FAKETIME_ONLY_CMDS" "test_ssl") (setenv "FAKETIME_ONLY_CMDS" "test_ssl")
(invoke "faketime" "2021-06-01" (invoke "faketime" "2021-12-12"
"ctest" "ctest"
"--exclude-regex" (string-join disabled-tests "|") "--exclude-regex" (string-join disabled-tests "|")
"-j" (if parallel-tests? "-j" (if parallel-tests?
(number->string (parallel-job-count)) (number->string (parallel-job-count))
"1"))))))))) "1")
"--rerun-failed"
"--output-on-failure"))))))))
(inputs (list boost openssl)) (inputs (list boost openssl))
(native-inputs `(("libfaketime" ,libfaketime) (native-inputs `(("libfaketime" ,libfaketime)
("python" ,python-wrapper) ("python" ,python-wrapper)