Index: trunk/DataStore/scripts/dsleech
===================================================================
--- trunk/DataStore/scripts/dsleech	(revision 11288)
+++ trunk/DataStore/scripts/dsleech	(revision 11289)
@@ -3,5 +3,5 @@
 # Copyright (C) 2006  Joshua Hoblitt
 #
-# $Id: dsleech,v 1.5 2007-01-25 03:39:31 jhoblitt Exp $
+# $Id: dsleech,v 1.6 2007-01-25 03:41:29 jhoblitt Exp $
 
 use strict;
@@ -18,5 +18,5 @@
 use Pod::Usage qw( pod2usage );
 
-my ($dir, $uri, $last_fileset, $recall, $remember, $verbose);
+my ($dir, $uri, $last_fileset, $overwrite, $recall, $remember, $verbose);
 
 GetOptions(
@@ -87,5 +87,5 @@
 sub process_filesets
 {
-    my ($filsets, $dir, $overwrite $verbose) = @_;
+    my ($filsets, $dir, $overwrite, $verbose) = @_;
 
     foreach my $fileset (@$filesets) {