From 08b7319f5bca01f46916faaec0f9de420404a5ad Mon Sep 17 00:00:00 2001
From: Eelco Dolstra <e.dolstra@tudelft.nl>
Date: Thu, 9 Oct 2003 15:38:31 +0000
Subject: [PATCH] * Follow successors by default (use `--no-successors' to
 override).

---
 scripts/nix-collect-garbage.in | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/scripts/nix-collect-garbage.in b/scripts/nix-collect-garbage.in
index 52f274367..9b471d896 100755
--- a/scripts/nix-collect-garbage.in
+++ b/scripts/nix-collect-garbage.in
@@ -8,11 +8,11 @@ my $storedir = "@prefix@/store";
 
 my %alive;
 
-my $keepsuccessors = 0;
+my $keepsuccessors = 1;
 my $invert = 0;
 
 foreach my $arg (@ARGV) {
-    if ($arg eq "--keep-successors") { $keepsuccessors = 1; }
+    if ($arg eq "--no-successors") { $keepsuccessors = 0; }
     elsif ($arg eq "--invert") { $invert = 1; }
     else { die "unknown argument `$arg'" };
 }