diff options
| author | Christopher Baines <mail@cbaines.net> | 2024-04-15 13:43:37 +0100 |
|---|---|---|
| committer | Christopher Baines <mail@cbaines.net> | 2024-04-15 13:43:37 +0100 |
| commit | 88b9d34fb16beec09577c30c384a41e9a89bfa4b (patch) | |
| tree | e35c8d3fa7b6477b00ecbc75fb4d230d1ec20bdc /guix-data-service | |
| parent | 7f5f11048bd6d28b001f5fff31b9149f1a9e96b9 (diff) | |
| download | data-service-88b9d34fb16beec09577c30c384a41e9a89bfa4b.tar data-service-88b9d34fb16beec09577c30c384a41e9a89bfa4b.tar.gz | |
Close store connections earlier
As I think the temporary roots on the long running store connection should be
sufficient.
Diffstat (limited to 'guix-data-service')
| -rw-r--r-- | guix-data-service/jobs/load-new-guix-revision.scm | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/guix-data-service/jobs/load-new-guix-revision.scm b/guix-data-service/jobs/load-new-guix-revision.scm index ab838ce..9579977 100644 --- a/guix-data-service/jobs/load-new-guix-revision.scm +++ b/guix-data-service/jobs/load-new-guix-revision.scm @@ -1430,8 +1430,7 @@ #:idle-seconds 10 #:destructor (match-lambda ((inferior . store) - ;; Don't close the store connection here, because there - ;; are temporary roots to keep alive + (close-connection store) (close-inferior inferior))))) (define add-temp-root/long-running-store |