aboutsummaryrefslogtreecommitdiff
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
parent78ad8db682516cb7a38f14bae069f45eb2942784 (diff)
downloadpatches-d6680dccb0cbff97946094b967b0b897fe88311a.tar
patches-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'.
-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