diff options
| author | Ludovic Courtès <ludo@gnu.org> | 2018-01-23 23:45:24 +0100 |
|---|---|---|
| committer | Ludovic Courtès <ludo@gnu.org> | 2018-01-23 23:45:24 +0100 |
| commit | d544f3e6baa42ec890baec268f207902c5cc0faf (patch) | |
| tree | 5a7a59de45bb138b9a63ba36e7e93d83ec51435a /bin | |
| parent | c1edfe8895060f88855236c6faee9e085e72ca6f (diff) | |
| download | cuirass-d544f3e6baa42ec890baec268f207902c5cc0faf.tar cuirass-d544f3e6baa42ec890baec268f207902c5cc0faf.tar.gz | |
cuirass: Fix scope mismatch.
Previously STORE would be closed on the first context switch, before
'restart-builds' has completed, leading to an error (writing to a closed
port).
* src/cuirass/base.scm (restart-builds): Remove 'store' parameter. Wrap
body in 'with-store'.
* bin/cuirass.in (main): Adjust accordingly.
Diffstat (limited to 'bin')
| -rw-r--r-- | bin/cuirass.in | 6 |
1 files changed, 2 insertions, 4 deletions
diff --git a/bin/cuirass.in b/bin/cuirass.in index d2cb897..9ece178 100644 --- a/bin/cuirass.in +++ b/bin/cuirass.in @@ -28,7 +28,6 @@ exec ${GUILE:-@GUILE@} --no-auto-compile -e main -s "$0" "$@" (cuirass ui) (cuirass logging) (guix ui) - (guix store) (fibers) (ice-9 getopt-long)) @@ -113,9 +112,8 @@ exec ${GUILE:-@GUILE@} --no-auto-compile -e main -s "$0" "$@" ;; were not even started on a previous run. (spawn-fiber (lambda () - (with-store store - (with-database db - (restart-builds store db pending))))) + (with-database db + (restart-builds db pending)))) (spawn-fiber (lambda () |