Start to add compatibility with squee returning #f for null values

While maintaining compatibility for older versions of squee.
This commit is contained in:
Christopher Baines 2021-01-02 10:06:27 +00:00
parent 7df6f92036
commit 64a4058cce
6 changed files with 53 additions and 38 deletions

View file

@ -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