01/02: Fix a null handling issue for system test derivation comparison

[Christopher Baines]

cbaines pushed a commit to branch master
in repository data-service.

commit 0175914f79188d0617c87e3b0290b5e6d356a048
Author: Christopher Baines <mail@cbaines.net>
AuthorDate: Thu Mar 25 17:49:44 2021 +0000

    Fix a null handling issue for system test derivation comparison
---
 guix-data-service/comparison.scm | 8 ++++++--
 1 file changed, 6 insertions(+), 2 deletions(-)

diff --git a/guix-data-service/comparison.scm b/guix-data-service/comparison.scm
index a61165e..e5e1955 100644
--- a/guix-data-service/comparison.scm
+++ b/guix-data-service/comparison.scm
@@ -1095,8 +1095,12 @@ ORDER BY coalesce(base_system_tests.name, 
target_system_tests.name) ASC"))
                                  (string=? base_derivation_file_name
                                            target_derivation_file_name))
                             base_derivation_file_name
-                            `((base   . ,base_derivation_file_name)
-                              (target . ,target_derivation_file_name))))
+                            `((base   . ,(if (null? base_derivation_file_name)
+                                             'null
+                                             base_derivation_file_name))
+                              (target . ,(if (null? 
target_derivation_file_name)
+                                             'null
+                                             target_derivation_file_name)))))
         (location    . ,(if
                          (and (string? base_file)
                               (string? target_file)