diff options
author | Ludovic Courtès <ludo@gnu.org> | 2020-04-14 15:19:51 +0200 |
---|---|---|
committer | Ludovic Courtès <ludo@gnu.org> | 2020-04-14 16:01:05 +0200 |
commit | 1ae7a9251b282a5f5e73a754dbc3b8bd4fe1da74 (patch) | |
tree | be5bfea7c95240acee7ea6250aa0c3b614d90d22 /guix/scripts | |
parent | bab1f340b35078dcfd3cbac67ad56393b53bb46b (diff) |
weather: Delete duplicate entries coming from '--manifest'.
* guix/scripts/weather.scm (load-manifest): Call 'delete-duplicates'.
Diffstat (limited to 'guix/scripts')
-rw-r--r-- | guix/scripts/weather.scm | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/guix/scripts/weather.scm b/guix/scripts/weather.scm index eb76771452..475d989357 100644 --- a/guix/scripts/weather.scm +++ b/guix/scripts/weather.scm @@ -339,8 +339,9 @@ Report the availability of substitutes.\n")) "Load the manifest from FILE and return the list of packages it refers to." (let* ((user-module (make-user-module '((guix profiles) (gnu)))) (manifest (load* file user-module))) - (map manifest-entry-item - (manifest-transitive-entries manifest)))) + (delete-duplicates (map manifest-entry-item + (manifest-transitive-entries manifest)) + eq?))) ;;; |