diff options
| author | Christopher Baines <mail@cbaines.net> | 2022-03-04 14:20:41 +0000 |
|---|---|---|
| committer | Christopher Baines <mail@cbaines.net> | 2022-03-04 14:20:41 +0000 |
| commit | 0cc749a1fa195989112ceaf6f82061d8d2c9643b (patch) | |
| tree | dafcdb7b50ecc68967489b479bbdc83059dcd62b /guix-data-service | |
| parent | 8ab72e633ae700fe58bb3bf72aa155d62c2bc22e (diff) | |
| download | data-service-0cc749a1fa195989112ceaf6f82061d8d2c9643b.tar data-service-0cc749a1fa195989112ceaf6f82061d8d2c9643b.tar.gz | |
Simplify deduplicate-inferior-packages
Use the a-version and b-version variables, rather than calling the functions
again.
Diffstat (limited to 'guix-data-service')
| -rw-r--r-- | guix-data-service/jobs/load-new-guix-revision.scm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/guix-data-service/jobs/load-new-guix-revision.scm b/guix-data-service/jobs/load-new-guix-revision.scm index 3a11082..2bcb99d 100644 --- a/guix-data-service/jobs/load-new-guix-revision.scm +++ b/guix-data-service/jobs/load-new-guix-revision.scm @@ -775,8 +775,8 @@ WHERE job_id = $1") (b-location (inferior-package-location b))) (< (location-line a-location) (location-line b-location))) - (string<? (inferior-package-version a) - (inferior-package-version b)))) + (string<? a-version + b-version))) (string<? a-name b-name))))))) |