Fix copy-tarballs.pl
This commit is contained in:
@@ -1,5 +1,5 @@
|
|||||||
#! /usr/bin/env nix-shell
|
#! /usr/bin/env nix-shell
|
||||||
#! nix-shell -i perl -p perl perlPackages.NetAmazonS3 perlPackages.FileSlurp nixUnstable nixUnstable.perl-bindings
|
#! nix-shell -i perl -p perl perlPackages.NetAmazonS3 perlPackages.FileSlurp perlPackages.JSON perlPackages.LWPProtocolHttps nixUnstable nixUnstable.perl-bindings
|
||||||
|
|
||||||
# This command uploads tarballs to tarballs.nixos.org, the
|
# This command uploads tarballs to tarballs.nixos.org, the
|
||||||
# content-addressed cache used by fetchurl as a fallback for when
|
# content-addressed cache used by fetchurl as a fallback for when
|
||||||
|
|||||||
@@ -31,7 +31,7 @@ let
|
|||||||
if !canEval x then []
|
if !canEval x then []
|
||||||
else if isDerivation x then optional (canEval x.drvPath) x
|
else if isDerivation x then optional (canEval x.drvPath) x
|
||||||
else if isList x then concatLists (map derivationsIn' x)
|
else if isList x then concatLists (map derivationsIn' x)
|
||||||
else if isAttrs x then concatLists (mapAttrsToList (n: v: derivationsIn' v) x)
|
else if isAttrs x then concatLists (mapAttrsToList (n: v: addErrorContext "while finding tarballs in '${n}':" (derivationsIn' v)) x)
|
||||||
else [ ];
|
else [ ];
|
||||||
|
|
||||||
keyDrv = drv: if canEval drv.drvPath then { key = drv.drvPath; value = drv; } else { };
|
keyDrv = drv: if canEval drv.drvPath then { key = drv.drvPath; value = drv; } else { };
|
||||||
|
|||||||
Reference in New Issue
Block a user