diff options
author | Eelco Dolstra <e.dolstra@tudelft.nl> | 2003-07-14T10·45+0000 |
---|---|---|
committer | Eelco Dolstra <e.dolstra@tudelft.nl> | 2003-07-14T10·45+0000 |
commit | 8898e86b4fe1ecf8b34a5cca2a7b9b38d395678c (patch) | |
tree | 1806b917e07bde457aec66aecc23af27f0c9cdf6 /scripts/nix-collect-garbage | |
parent | 3509299aca833ed50faab146f985853255041cb2 (diff) |
* Get the garbage collector to work again.
Diffstat (limited to 'scripts/nix-collect-garbage')
-rwxr-xr-x | scripts/nix-collect-garbage | 22 |
1 files changed, 0 insertions, 22 deletions
diff --git a/scripts/nix-collect-garbage b/scripts/nix-collect-garbage deleted file mode 100755 index adaba5b7c65b..000000000000 --- a/scripts/nix-collect-garbage +++ /dev/null @@ -1,22 +0,0 @@ -#! /usr/bin/perl -w - -my $prefix = $ENV{"NIX"} || "/nix"; # !!! use prefix -my $linkdir = "$prefix/var/nix/links"; - -my %alive; - -open HASHES, "nix closure \$(cat $linkdir/*.hash) |"; -while (<HASHES>) { - chomp; - $alive{$_} = 1; -} -close HASHES; - -open HASHES, "nix listinst |"; -while (<HASHES>) { - chomp; - if (!$alive{$_}) { - print "$_\n"; - } -} -close HASHES; |