diff options
| author | Christopher Baines <mail@cbaines.net> | 2020-12-20 15:22:58 +0000 |
|---|---|---|
| committer | Christopher Baines <mail@cbaines.net> | 2020-12-20 15:22:58 +0000 |
| commit | e678966f244198079a1818429fa0bf8055dbb825 (patch) | |
| tree | 2924fa35c3ee26a19f90bbbed6f405ce262fbe12 | |
| parent | 0304adb59d2f56571713e4ce78193834f31109f7 (diff) | |
| download | build-coordinator-e678966f244198079a1818429fa0bf8055dbb825.tar build-coordinator-e678966f244198079a1818429fa0bf8055dbb825.tar.gz | |
Use a canonical path for the sqitch registry
As that seems to work better when the database isn't in the current working
directory.
| -rw-r--r-- | guix-build-coordinator/datastore/sqlite.scm | 11 |
1 files changed, 6 insertions, 5 deletions
diff --git a/guix-build-coordinator/datastore/sqlite.scm b/guix-build-coordinator/datastore/sqlite.scm index 75ad9e6..e996d78 100644 --- a/guix-build-coordinator/datastore/sqlite.scm +++ b/guix-build-coordinator/datastore/sqlite.scm @@ -2256,11 +2256,12 @@ WHERE build_results.build_id = :build_id" (string-append (dirname (%config 'sqitch-plan)) "/sqlite")) "--plan-file" (%config 'sqitch-plan) - "--registry" (string-append - (if (string-suffix? ".db" database-file) - (string-drop-right database-file 3) - database-file) - "_sqitch_registry.db") + "--registry" (canonicalize-path + (string-append + (if (string-suffix? ".db" database-file) + (string-drop-right database-file 3) + database-file) + "_sqitch_registry.db")) (string-append "db:sqlite:" database-file)))) (simple-format #t "running command: ~A\n" |