aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorChristopher Baines <mail@cbaines.net>2023-02-13 20:10:23 +0000
committerChristopher Baines <mail@cbaines.net>2023-02-13 20:10:23 +0000
commit9872367c01d95ed3fc5c73dd8ea31c3fa851f189 (patch)
tree0bf8a6395db1daeab74b96e43cc65f7ea87bb1e7
parent078516e0ab67916b8b428580c7deaf0c12097e13 (diff)
downloaddata-service-9872367c01d95ed3fc5c73dd8ea31c3fa851f189.tar
data-service-9872367c01d95ed3fc5c73dd8ea31c3fa851f189.tar.gz
Avoid errors dropping partition tables if they don't exist
-rw-r--r--guix-data-service/data-deletion.scm2
1 files changed, 1 insertions, 1 deletions
diff --git a/guix-data-service/data-deletion.scm b/guix-data-service/data-deletion.scm
index a91d02b..07aeba5 100644
--- a/guix-data-service/data-deletion.scm
+++ b/guix-data-service/data-deletion.scm
@@ -222,7 +222,7 @@ WHERE id IN (
conn
(string-append
"
-DROP TABLE package_derivations_by_guix_revision_range_git_branch_"
+DROP TABLE IF EXISTS package_derivations_by_guix_revision_range_git_branch_"
(number->string git-branch-id) ";")))
(delete-guix-revisions conn git-repository-id commits))))