diff options
author | Ludovic Courtès <ludo@gnu.org> | 2016-12-31 01:40:35 +0100 |
---|---|---|
committer | Ludovic Courtès <ludo@gnu.org> | 2016-12-31 01:44:04 +0100 |
commit | a3a27745013f3e5a287de3bf0187b2f72beb6965 (patch) | |
tree | a7f26be8a7d176ff0184c8eb9afa7701b8322e51 /build-aux/hydra/gnu-system.scm | |
parent | da62a4a19ea398e950aefcdd64ae25a475505e8f (diff) | |
download | guix-a3a27745013f3e5a287de3bf0187b2f72beb6965.tar.gz |
hydra: Remove 'qemu-image' job.
As per the discussion at <https://lists.gnu.org/archive/html/guix-devel/2016-12/msg01098.html>. * build-aux/hydra/gnu-system.scm (demo-os): Remove. (qemu-jobs): Remove 'qemu-image' job. * build-aux/hydra/demo-os.scm: Remove.
Diffstat (limited to 'build-aux/hydra/gnu-system.scm')
-rw-r--r-- | build-aux/hydra/gnu-system.scm | 15 |
1 files changed, 1 insertions, 14 deletions
diff --git a/build-aux/hydra/gnu-system.scm b/build-aux/hydra/gnu-system.scm index cddda85eac..e406ed94c5 100644 --- a/build-aux/hydra/gnu-system.scm +++ b/build-aux/hydra/gnu-system.scm @@ -125,12 +125,6 @@ SYSTEM." "arm-linux-gnueabihf" "i686-w64-mingw32")) -(define (demo-os) - "Return the \"demo\" 'operating-system' structure." - (let* ((dir (dirname (assoc-ref (current-source-location) 'filename))) - (file (string-append dir "/demo-os.scm"))) - (read-operating-system file))) - (define %guixsd-supported-systems '("x86_64-linux" "i686-linux")) @@ -156,14 +150,7 @@ system.") (expt 2 20)) (if (member system %guixsd-supported-systems) - (list (->job 'qemu-image - (run-with-store store - (mbegin %store-monad - (set-guile-for-build (default-guile)) - (system-qemu-image (demo-os) - #:disk-image-size - (* 1400 MiB))))) ; 1.4 GiB - (->job 'usb-image + (list (->job 'usb-image (run-with-store store (mbegin %store-monad (set-guile-for-build (default-guile)) |