--- loncom/metadata_database/cleanup_database.pl	2002/09/09 14:01:04	1.2
+++ loncom/metadata_database/cleanup_database.pl	2004/06/09 12:39:39	1.4
@@ -1,8 +1,8 @@
 #!/usr/bin/perl
 # The LearningOnline Network
-# searchcat.pl "Search Catalog" batch script
+# cleanup_database.pl Remove stale temporary search results.
 #
-# $Id: cleanup_database.pl,v 1.2 2002/09/09 14:01:04 harris41 Exp $
+# $Id: cleanup_database.pl,v 1.4 2004/06/09 12:39:39 matthew Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -79,7 +79,7 @@ use Time::Local;
 use DBI;
 
 my $help = 0;
-my $killtime = 86400;
+my $killtime = 86400*2;
 GetOptions( "killtime=s" => \$killtime, 
             "help"       => \$help );
 if ($help) {