diff options
Diffstat (limited to 'guix-data-service/model/git-branch.scm')
-rw-r--r-- | guix-data-service/model/git-branch.scm | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/guix-data-service/model/git-branch.scm b/guix-data-service/model/git-branch.scm index 19e0ccc..070931d 100644 --- a/guix-data-service/model/git-branch.scm +++ b/guix-data-service/model/git-branch.scm @@ -105,7 +105,8 @@ WHERE git_branches.commit = $1") (list commit datetime (string=? guix_revision_exists "t") - (if (string=? job_events "") + (if (or (and (string? job_events) (string-null? job_events)) + (eq? #f job_events)) '() (vector->list (json-string->scm job_events)))))) (exec-query @@ -161,7 +162,8 @@ ORDER BY name, datetime DESC")) commit datetime (string=? guix_revision_exists "t") - (if (string=? job_events "") + (if (or (and (string? job_events) (string=? job_events "")) + (eq? #f job_events)) '() (vector->list (json-string->scm job_events)))))) (exec-query |