diff options
Diffstat (limited to 'tests/guix-jobs.scm')
-rw-r--r-- | tests/guix-jobs.scm | 32 |
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))) |