guix
/
data-service
mirror of git://git.savannah.gnu.org/guix/data-service.git
2
0
Fork 0
Code Issues Releases Wiki Activity

Stop replacements cluttering comparisons 

This stops the replaced package getting compared with it's replacement.
This commit is contained in:
Christopher Baines 2023-11-18 10:36:10 +00:00
parent b2bf948a00
commit e13febc817
1 changed files with 18 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

18
guix-data-service/comparison.scm
View File

@ -395,6 +395,15 @@ FULL OUTER JOIN target_packages
AND base_packages.version = target_packages.version
AND base_packages.system = target_packages.system
AND base_packages.target = target_packages.target
AND (
(
base_packages.replacement_package_id IS NULL AND
target_packages.replacement_package_id IS NULL
) OR (
base_packages.replacement_package_id IS NOT NULL AND
target_packages.replacement_package_id IS NOT NULL
)
)
WHERE
(
base_packages.id IS NULL OR
@ -577,6 +586,15 @@ FROM base_packages
FULL OUTER JOIN target_packages
ON base_packages.name = target_packages.name
AND base_packages.version = target_packages.version
AND (
(
base_packages.replacement_package_id IS NULL AND
target_packages.replacement_package_id IS NULL
) OR (
base_packages.replacement_package_id IS NOT NULL AND
target_packages.replacement_package_id IS NOT NULL
)
)
WHERE
base_packages.id IS NULL OR
target_packages.id IS NULL OR