diff options
| -rw-r--r-- | bin/cuirass.in | 11 |
1 files changed, 5 insertions, 6 deletions
diff --git a/bin/cuirass.in b/bin/cuirass.in index 88813b8..ced9c54 100644 --- a/bin/cuirass.in +++ b/bin/cuirass.in @@ -83,9 +83,8 @@ exec ${GUILE:-@GUILE@} --no-auto-compile -e main -s "$0" "$@" (primitive-load specfile))))) (for-each (λ (spec) (db-add-specification db spec)) new-specs))) - (let ((specs (db-get-specifications db))) - (if one-shot? - (process-specs db specs) - (while #t - (process-specs db specs) - (sleep interval))))))))))) + (if one-shot? + (process-specs db (db-get-specifications db)) + (while #t + (process-specs db (db-get-specifications db)) + (sleep interval)))))))))) |