diff options
Diffstat (limited to 'src/cuirass/base.scm')
| -rw-r--r-- | src/cuirass/base.scm | 9 |
1 files changed, 8 insertions, 1 deletions
diff --git a/src/cuirass/base.scm b/src/cuirass/base.scm index 143bc2e..e7c2597 100644 --- a/src/cuirass/base.scm +++ b/src/cuirass/base.scm @@ -670,7 +670,14 @@ started)." (#:timestamp . ,cur-time) (#:starttime . 0) (#:stoptime . 0)))) - (db-add-build build)))) + (if (db-add-build build) + (begin + (db-add-event 'build + cur-time + `((#:derivation . ,drv) + (#:event . scheduled))) + drv) + #f)))) (define derivations (filter-map register jobs)) |