aboutsummaryrefslogtreecommitdiff
path: root/guix-data-service/model/derivation.scm
diff options
context:
space:
mode:
Diffstat (limited to 'guix-data-service/model/derivation.scm')
-rw-r--r--guix-data-service/model/derivation.scm10
1 files changed, 6 insertions, 4 deletions
diff --git a/guix-data-service/model/derivation.scm b/guix-data-service/model/derivation.scm
index cd850ae..033168b 100644
--- a/guix-data-service/model/derivation.scm
+++ b/guix-data-service/model/derivation.scm
@@ -59,10 +59,12 @@
derivation-file-names->derivation-ids))
(define (valid-systems conn)
- (map car
- (exec-query
- conn
- "SELECT DISTINCT system FROM derivations ORDER BY 1")))
+ ;; TODO, use the database, but make it quick!
+ '("aarch64-linux"
+ "armhf-linux"
+ "i686-linux"
+ "mips64el-linux"
+ "x86_64-linux"))
(define (count-derivations conn)
(first