diff options
author | Tobias Geerinckx-Rice <me@tobias.gr> | 2024-09-29 02:00:00 +0200 |
---|---|---|
committer | Tobias Geerinckx-Rice <me@tobias.gr> | 2024-09-29 02:00:00 +0200 |
commit | a47d7af2273c2dbb5376e776b34e78a9146abbfe (patch) | |
tree | fda5d55826bc78577ea8328e23b75660a60e195f /gnu/packages/version-control.scm | |
parent | b1df929e1b017f66d87042474d72a0935028d499 (diff) | |
download | guix-a47d7af2273c2dbb5376e776b34e78a9146abbfe.tar.gz guix-a47d7af2273c2dbb5376e776b34e78a9146abbfe.zip |
gnu: src: Respect #:tests? argument.
* gnu/packages/version-control.scm (src)[arguments]: Skip the 'check
phase when #:tests? is false.
Change-Id: Ic39cdb1e9a158d16d022f6e41a954b567731b124
Diffstat (limited to 'gnu/packages/version-control.scm')
-rw-r--r-- | gnu/packages/version-control.scm | 11 |
1 files changed, 6 insertions, 5 deletions
diff --git a/gnu/packages/version-control.scm b/gnu/packages/version-control.scm index 0096d3d829..de59c49b64 100644 --- a/gnu/packages/version-control.scm +++ b/gnu/packages/version-control.scm @@ -3449,11 +3449,12 @@ specific files and directories.") (wrap-program prog `("PATH" ":" prefix (,(dirname rcs))))))) (replace 'check - (lambda _ - (setenv "HOME" (getenv "TMPDIR")) - (invoke "git" "config" "--global" "user.name" "guix") - (invoke "git" "config" "--global" "user.email" "guix") - (invoke "./srctest")))))) + (lambda* (#:key tests? #:allow-other-keys) + (when tests? + (setenv "HOME" (getenv "TMPDIR")) + (invoke "git" "config" "--global" "user.name" "guix") + (invoke "git" "config" "--global" "user.email" "guix") + (invoke "./srctest"))))))) (native-inputs (list asciidoc ;; For testing. |