summary refs log tree commit diff
path: root/build-aux/hydra
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2018-05-12 15:57:46 +0200
committerLudovic Courtès <ludo@gnu.org>2018-05-12 15:58:56 +0200
commitd6680dccb0cbff97946094b967b0b897fe88311a (patch)
tree144b90c7e4e273c38e258bd1afe4a4ebe04d195a /build-aux/hydra
parent78ad8db682516cb7a38f14bae069f45eb2942784 (diff)
downloadguix-d6680dccb0cbff97946094b967b0b897fe88311a.tar.gz
hydra: Switch back to "-" instead of "@" in package job names.
Fixes a regression introduced in ede121de426f9c56820852888a0b370f0ccbce49.
Reported by Mark H Weaver <mhw@netris.org>.

* build-aux/hydra/gnu-system.scm (job-name): Pass "-" as the second
argument to 'package-full-name'.
Diffstat (limited to 'build-aux/hydra')
-rw-r--r--build-aux/hydra/gnu-system.scm3
1 files changed, 2 insertions, 1 deletions
diff --git a/build-aux/hydra/gnu-system.scm b/build-aux/hydra/gnu-system.scm
index 62eb957f83..654f3ecf3e 100644
--- a/build-aux/hydra/gnu-system.scm
+++ b/build-aux/hydra/gnu-system.scm
@@ -264,7 +264,8 @@ all its dependencies, and ready to be installed on non-GuixSD distributions.")
 
 (define job-name
   ;; Return the name of a package's job.
-  (compose string->symbol package-full-name))
+  (compose string->symbol
+           (cut package-full-name <> "-")))
 
 (define package->job
   (let ((base-packages