From 343e10aaa6c1db3313cf744427538b170182a9ad Mon Sep 17 00:00:00 2001
From: Aaron Andersen <aaron@fosslib.net>
Date: Mon, 20 Aug 2018 18:35:02 -0400
Subject: [PATCH] function rewritten by @Infinisil

---
 lib/strings.nix | 9 +--------
 1 file changed, 1 insertion(+), 8 deletions(-)

diff --git a/lib/strings.nix b/lib/strings.nix
index 64b5e83ff9b4..af932ce6ecff 100644
--- a/lib/strings.nix
+++ b/lib/strings.nix
@@ -133,14 +133,7 @@ rec {
        makeFullPerlPath [ pkgs.perlPackages.CGI ]
        => "/nix/store/fddivfrdc1xql02h9q500fpnqy12c74n-perl-CGI-4.38/lib/perl5/site_perl:/nix/store/8hsvdalmsxqkjg0c5ifigpf31vc4vsy2-perl-HTML-Parser-3.72/lib/perl5/site_perl:/nix/store/zhc7wh0xl8hz3y3f71nhlw1559iyvzld-perl-HTML-Tagset-3.20/lib/perl5/site_perl"
   */
-  makeFullPerlPath = deps:
-    let
-      recurse = dep:
-        [ dep ] ++ dep.propagatedBuildInputs ++ (map (arg: recurse arg) dep.propagatedBuildInputs)
-      ;
-    in
-      makePerlPath (lib.unique (lib.flatten (map (arg: recurse arg) deps)))
-  ;
+  makeFullPerlPath = deps: makePerlPath (lib.misc.closePropagation deps);
 
   /* Depending on the boolean `cond', return either the given string
      or the empty string. Useful to concatenate against a bigger string.