summaryrefslogtreecommitdiff
path: root/tests/guix-jobs.scm
diff options
context:
space:
mode:
Diffstat (limited to 'tests/guix-jobs.scm')
-rw-r--r--tests/guix-jobs.scm32
1 files changed, 14 insertions, 18 deletions
diff --git a/tests/guix-jobs.scm b/tests/guix-jobs.scm
index 9196147..470305f 100644
--- a/tests/guix-jobs.scm
+++ b/tests/guix-jobs.scm
@@ -17,24 +17,20 @@
;;; You should have received a copy of the GNU General Public License
;;; along with Cuirass. If not, see <http://www.gnu.org/licenses/>.
-(use-modules (cuirass job))
-
-;; In the common case jobs will be defined relative to the repository.
-;; However for testing purpose use local gnu-system.scm instead.
(define (local-file file)
+ ;; In the common case jobs will be defined relative to the repository.
+ ;; However for testing purpose use local gnu-system.scm instead.
(string-append (dirname (current-filename)) "/" file))
-(list (make-job-spec
- #:name "guix"
- #:url "git://git.savannah.gnu.org/guix.git"
- #:load-path "."
- #:branch "master"
- #:file (local-file "gnu-system.scm")
- #:proc 'hydra-jobs)
- (make-job-spec
- #:name "guix"
- #:url "git://git.savannah.gnu.org/guix.git"
- #:load-path "."
- #:tag "v0.10.0"
- #:file (local-file "gnu-system.scm")
- #:proc 'hydra-jobs))
+`(((#:name . "guix")
+ (#:url . "git://git.savannah.gnu.org/guix.git")
+ (#:load-path . ".")
+ (#:branch . "master")
+ (#:file . ,(local-file "gnu-system.scm"))
+ (#:proc . hydra-jobs))
+ ((#:name . "guix")
+ (#:url . "git://git.savannah.gnu.org/guix.git")
+ (#:load-path . ".")
+ (#:tag . "v0.10.0")
+ (#:file . ,(local-file "gnu-system.scm"))
+ (#:proc . hydra-jobs)))