Fix matching NULL

This commit is contained in:
Christopher Baines 2025-01-27 12:25:04 +00:00
parent ad30746fab
commit 9a1c1b30cb

View file

@ -375,7 +375,7 @@ ORDER BY COUNT(*) DESC")
(match status (match status
("t" 'matching) ("t" 'matching)
("f" 'not-matching) ("f" 'not-matching)
(() 'unknown)) ((? NULL? x) 'unknown))
(string->number count)))) (string->number count))))
(exec-query-with-null-handling conn query (list revision-commit))))) (exec-query-with-null-handling conn query (list revision-commit)))))