diff options
| author | Christopher Baines <mail@cbaines.net> | 2023-07-17 13:28:42 +0100 |
|---|---|---|
| committer | Christopher Baines <mail@cbaines.net> | 2023-07-17 13:28:42 +0100 |
| commit | de6d38016d0392327e43393e45320799ffa0fadf (patch) | |
| tree | ee2ee7fc72841ee0fa9b5b5261f533d1e3b5d4e7 | |
| parent | ed974ebf3b9eeb60a6256fb9f2fc654b6e8bd3e2 (diff) | |
| download | data-service-de6d38016d0392327e43393e45320799ffa0fadf.tar data-service-de6d38016d0392327e43393e45320799ffa0fadf.tar.gz | |
Tweak which duplicate packages to select
This helps with replacements, as the original package is usually higher up in
the file.
| -rw-r--r-- | guix-data-service/jobs/load-new-guix-revision.scm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/guix-data-service/jobs/load-new-guix-revision.scm b/guix-data-service/jobs/load-new-guix-revision.scm index 6f61bf4..53e0037 100644 --- a/guix-data-service/jobs/load-new-guix-revision.scm +++ b/guix-data-service/jobs/load-new-guix-revision.scm @@ -970,7 +970,7 @@ WHERE job_id = $1") ;; location. (let ((a-location (inferior-package-location a)) (b-location (inferior-package-location b))) - (< (location-line a-location) + (> (location-line a-location) (location-line b-location))) (string<? a-version b-version))) |