diff options
-rw-r--r-- | guix-data-service/branch-updated-emails.scm | 2 | ||||
-rw-r--r-- | guix-data-service/web/view/html.scm | 4 | ||||
-rw-r--r-- | sqitch/deploy/fix_null_values_in_git_branches.sql | 11 | ||||
-rw-r--r-- | sqitch/revert/fix_null_values_in_git_branches.sql | 7 | ||||
-rw-r--r-- | sqitch/sqitch.plan | 1 | ||||
-rw-r--r-- | sqitch/verify/fix_null_values_in_git_branches.sql | 7 |
6 files changed, 29 insertions, 3 deletions
diff --git a/guix-data-service/branch-updated-emails.scm b/guix-data-service/branch-updated-emails.scm index 246ba53..df5771e 100644 --- a/guix-data-service/branch-updated-emails.scm +++ b/guix-data-service/branch-updated-emails.scm @@ -50,7 +50,7 @@ branch-name (if (string=? "0000000000000000000000000000000000000000" x-git-newrev) - "NULL" + "" x-git-newrev) git-repository-id date) diff --git a/guix-data-service/web/view/html.scm b/guix-data-service/web/view/html.scm index 872d6cc..20a02fc 100644 --- a/guix-data-service/web/view/html.scm +++ b/guix-data-service/web/view/html.scm @@ -940,7 +940,7 @@ "/branch/" name))) ,name)) (td ,date) - (td ,@(if (string=? commit "NULL") + (td ,@(if (string=? commit "") '((samp "branch deleted")) `((a (@ (href ,(string-append "/revision/" commit))) @@ -1048,7 +1048,7 @@ (previous-commit previous-revision-exists?)) `(tr (td ,date) - (td ,@(if (string=? commit "NULL") + (td ,@(if (string=? commit "") '((samp "branch deleted")) `((a (@ (href ,(string-append "/revision/" commit))) diff --git a/sqitch/deploy/fix_null_values_in_git_branches.sql b/sqitch/deploy/fix_null_values_in_git_branches.sql new file mode 100644 index 0000000..468d041 --- /dev/null +++ b/sqitch/deploy/fix_null_values_in_git_branches.sql @@ -0,0 +1,11 @@ +-- Deploy guix-data-service:fix_null_values_in_git_branches to pg + +BEGIN; + +ALTER TABLE git_branches DROP CONSTRAINT git_branches_pkey; + +UPDATE git_branches SET commit = '' WHERE commit = 'NULL'; + +ALTER TABLE git_branches ADD PRIMARY KEY (name, commit, git_repository_id, datetime); + +COMMIT; diff --git a/sqitch/revert/fix_null_values_in_git_branches.sql b/sqitch/revert/fix_null_values_in_git_branches.sql new file mode 100644 index 0000000..e4991fc --- /dev/null +++ b/sqitch/revert/fix_null_values_in_git_branches.sql @@ -0,0 +1,7 @@ +-- Revert guix-data-service:fix_null_values_in_git_branches from pg + +BEGIN; + +-- XXX Add DDLs here. + +COMMIT; diff --git a/sqitch/sqitch.plan b/sqitch/sqitch.plan index ff17ebd..859258a 100644 --- a/sqitch/sqitch.plan +++ b/sqitch/sqitch.plan @@ -22,3 +22,4 @@ lint_warnings 2019-08-18T17:10:12Z Christopher Baines <mail@cbaines.net> # Store guix_revision_lint_checkers 2019-09-01T12:17:38Z chris <chris@phact> # Associate lint_checkers to guix_revisions package_versions_by_guix_revision_range 2019-09-26T20:23:15Z Christopher Baines <mail@cbaines.net> # Add package_versions_by_guix_revision_range table index_on_load_new_guix_revision_job_events_job_id 2019-09-29T10:39:04Z Christopher Baines <mail@cbaines.net> # Add index on load_new_guix_revision_job_events.job_id +fix_null_values_in_git_branches 2019-09-29T11:06:12Z Christopher Baines <mail@cbaines.net> # Fix the NULL values in git_branches diff --git a/sqitch/verify/fix_null_values_in_git_branches.sql b/sqitch/verify/fix_null_values_in_git_branches.sql new file mode 100644 index 0000000..b8176a8 --- /dev/null +++ b/sqitch/verify/fix_null_values_in_git_branches.sql @@ -0,0 +1,7 @@ +-- Verify guix-data-service:fix_null_values_in_git_branches on pg + +BEGIN; + +-- XXX Add verifications here. + +ROLLBACK; |