From 09c5b4cb9e8060181cc5e975df7e34856d60f235 Mon Sep 17 00:00:00 2001 From: Colin Kuskie Date: Tue, 10 Mar 2009 13:24:12 -0700 Subject: [PATCH] Rename install file. Actually call the sub. --- sbin/{installCopySender.pm => installCopySender.pl} | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) rename sbin/{installCopySender.pm => installCopySender.pl} (95%) diff --git a/sbin/installCopySender.pm b/sbin/installCopySender.pl similarity index 95% rename from sbin/installCopySender.pm rename to sbin/installCopySender.pl index 0aa313e59..88c1d813f 100644 --- a/sbin/installCopySender.pm +++ b/sbin/installCopySender.pl @@ -36,13 +36,15 @@ pod2usage( msg => "Must specify a config file!" ) unless $configFile; my $session = start( $webguiRoot, $configFile ); # Do your work here +installCopySender($session); finish($session); #---------------------------------------------------------------------------- # Your sub here sub installCopySender { my $session = shift; - return if $session->setting->get('inboxCopySender'); + return if $session->setting->has('inboxCopySender'); + $session->setting->add('inboxCopySender',0); } #----------------------------------------------------------------------------