diff options
-rw-r--r-- | bffe/manage-builds.scm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/bffe/manage-builds.scm b/bffe/manage-builds.scm index f6f4952..5520f31 100644 --- a/bffe/manage-builds.scm +++ b/bffe/manage-builds.scm @@ -325,7 +325,8 @@ (vector->list (assoc-ref channel-instance-derivation "builds"))))))) - (vector->list all-channel-instance-derivations)))) + (or (and=> all-channel-instance-derivations vector->list) + '())))) (unless (null? channel-instance-derivations-to-submit) (log-msg 'INFO "submitting " (length channel-instance-derivations-to-submit) |