From: miker <miker@dcc99617-32d9-48b4-a31d-7c20da2025e4>
Date: Fri, 23 Feb 2007 01:06:18 +0000 (+0000)
Subject: give configurable sleep interval and fix failure message output
X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=51571566e4e0c55cdffd6af26de7ca326120c976;p=Evergreen.git

give configurable sleep interval and fix failure message output


git-svn-id: svn://svn.open-ils.org/ILS/trunk@7006 dcc99617-32d9-48b4-a31d-7c20da2025e4
---

diff --git a/Open-ILS/src/reporter/clark-kent.pl b/Open-ILS/src/reporter/clark-kent.pl
index 0624b23bfb..35ec203147 100755
--- a/Open-ILS/src/reporter/clark-kent.pl
+++ b/Open-ILS/src/reporter/clark-kent.pl
@@ -33,14 +33,14 @@ my ($count, $config, $sleep_interval, $lockfile, $daemon) = (1, '/openils/conf/b
 
 GetOptions(
 	"daemon"	=> \$daemon,
-	"sleep"		=> \$sleep_interval,
+	"sleep=i"	=> \$sleep_interval,
 	"concurrency=i"	=> \$count,
 	"boostrap=s"	=> \$config,
 	"lockfile=s"	=> \$lockfile,
 );
 
 if (-e $lockfile) {
-	die "I seem to be running already. If not remove $lockfile, try again\n";
+	die "I seem to be running already. If not, remove $lockfile and try again\n";
 }
 
 OpenSRF::System->bootstrap_client( config_file => $config );
@@ -54,6 +54,8 @@ my $db_name = $sc->config_value( reporter => setup => database => 'name' );
 my $db_user = $sc->config_value( reporter => setup => database => 'user' );
 my $db_pw = $sc->config_value( reporter => setup => database => 'password' );
 
+die "I don't seem to be configured" unless ($db_driver && $db_host && $db_port && $db_name && $db_user);
+
 my $email_server = $sc->config_value( email_notify => 'smtp_server' );
 my $email_sender = $sc->config_value( email_notify => 'sender_address' );
 my $success_template = $sc->config_value( reporter => setup => files => 'success_template' );