--- /usr/bin/stow	Tue Oct  6 03:32:44 1998
+++ stow.patched	Sun Apr  2 01:35:38 2000
@@ -30,7 +30,7 @@
 $NotReally = 0;
 $Verbose = 0;
 $ReportHelp = 0;
-$Stow = &fastcwd;
+$Stow   = undef;
 $Target = undef;
 $Restow = 0;
 
@@ -107,6 +107,11 @@
 }
 
 &usage("No packages named") unless @ARGV;
+
+if ($Stow) {
+  chdir($Stow) || die "Cannot chdir to target tree $Stow ($!)\n";
+}
+$Stow = &fastcwd;
 
 $Target = &parent($Stow) unless $Target;