From 871ad44b1cb965d895cc2059d57e6247968ddf09 Mon Sep 17 00:00:00 2001 From: Micke Nordin Date: Mon, 12 Sep 2016 17:33:53 +0200 Subject: [PATCH] Small fix --- cluster_cron.pl | 5 ++--- 1 file changed, 2 insertions(+), 3 deletions(-) diff --git a/cluster_cron.pl b/cluster_cron.pl index 31e830d..0d630a6 100755 --- a/cluster_cron.pl +++ b/cluster_cron.pl @@ -16,8 +16,6 @@ if ($num_args < 2) { # We need a common directory for our nodes to write and read state from plus a couple of cronfiles my ($user, $shareddir, $mode, $spooldir) = @ARGV; -print "Mode: $mode, user: $user, shareddir: $shareddir and spooldir: $spooldir\n"; - # Set some defaults if we didn't get them unless ($mode == 0) { # mode 0 = active/passive, mode 1 = active/active @@ -40,6 +38,7 @@ my $time = time; print "Host: $hostname started run at: $time\n"; +print "Mode: $mode, user: $user, shareddir: $shareddir and spooldir: $spooldir\n"; # Create directories unless (-d $sharedcrondir) { @@ -148,7 +147,7 @@ sub comment_out { # Remove a # from any crontab entry sub uncomment { my ($infile, $outfile) = @_; - print "Unommenting, infile is $infile and outfile is $outfile\n"; + print "Uncommenting, infile is $infile and outfile is $outfile\n"; open(INFILE,"<$infile"); my $content = ''; while(my $line = ) {