diff options
author | Ludovic Courtès <ludo@gnu.org> | 2018-05-12 15:57:46 +0200 |
---|---|---|
committer | Ludovic Courtès <ludo@gnu.org> | 2018-05-12 15:58:56 +0200 |
commit | d6680dccb0cbff97946094b967b0b897fe88311a (patch) | |
tree | 144b90c7e4e273c38e258bd1afe4a4ebe04d195a /build-aux | |
parent | 78ad8db682516cb7a38f14bae069f45eb2942784 (diff) | |
download | guix-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')
-rw-r--r-- | build-aux/hydra/gnu-system.scm | 3 |
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 |