LP 1435966: Clark Kent should write lock file after it forks.

Rearrange the code in clark-kent.pl so that the lock/pid file is
opened and written to after the reporter daemonizes itself.  This
way, the pid in the file can actually be used to stop the running
reporter daemon.

Signed-off-by: Jason Stephenson <jstephenson@mvlc.org>
Signed-off-by: Galen Charlton <gmc@esilibrary.com>

diff --git a/Open-ILS/src/reporter/clark-kent.pl b/Open-ILS/src/reporter/clark-kent.pl
index 2e9bbd9..8893fc5 100755 (executable)
--- a/Open-ILS/src/reporter/clark-kent.pl
+++ b/Open-ILS/src/reporter/clark-kent.pl
@@ -91,10 +91,10 @@ my $data_dsn  = "dbi:" .  $data_db{db_driver} . ":dbname=" .  $data_db{db_name}
 my ($dbh,$running,$sth,@reports,$run, $current_time);
 
 if ($daemon) {
+       daemonize("Clark Kent, waiting for trouble");
        open(F, ">$lockfile") or die "Cannot write lockfile '$lockfile'";
        print F $$;
        close F;
-       daemonize("Clark Kent, waiting for trouble");
 }