03/06: weather: Delete duplicate entries coming from '--manifest'.

[guix-commits]

civodul pushed a commit to branch version-1.1.0
in repository guix.

commit 1ae7a9251b282a5f5e73a754dbc3b8bd4fe1da74
Author: Ludovic Courtès <address@hidden>
AuthorDate: Tue Apr 14 15:19:51 2020 +0200

    weather: Delete duplicate entries coming from '--manifest'.
    
    * guix/scripts/weather.scm (load-manifest): Call 'delete-duplicates'.
---
 guix/scripts/weather.scm | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/guix/scripts/weather.scm b/guix/scripts/weather.scm
index eb76771..475d989 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?)))
 
 
 ;;;