[Ispman-cvs] CVS: ispman-utils/bin ispman-agent,1.17,1.18

[Atif G. <ma...@us...>]

Update of /cvsroot/ispman/ispman-utils/bin
In directory usw-pr-cvs1:/tmp/cvs-serv11766

Modified Files:
	ispman-agent 
Log Message:
added 

Index: ispman-agent
===================================================================
RCS file: /cvsroot/ispman/ispman-utils/bin/ispman-agent,v
retrieving revision 1.17
retrieving revision 1.18
diff -C2 -r1.17 -r1.18
*** ispman-agent	2001/02/01 11:48:40	1.17
--- ispman-agent	2001/02/01 11:53:21	1.18
***************
*** 33,36 ****
--- 33,37 ----
  $install_dir=$ispman->getConf("installDir");
  $agentFrequency=$ispman->getConf("agentFrequency")  || 1; 
+ $sleepSeconds=30;
  
  
***************
*** 106,109 ****
--- 107,112 ----
  }
  open STDERR, '>&STDOUT' or die "Can't dup stdout: $!";
+ print "Starting ispman-agent\n";
+ print "Polling every $agentFrequency x $sleepSeconds seconds\n\n";
  
  
***************
*** 117,121 ****
  	my ($domain, $params, $process);
          my $message="";
! 	print "Polling for hostnames", @hostnames, "\n";
  
  
--- 120,126 ----
  	my ($domain, $params, $process);
          my $message="";
! 	print "Polling for hostnames ";
! 	print join ", " , @hostnames;
! 	print "\n";
  
  
***************
*** 146,150 ****
  
  
! 	sleep (30 * $agentFrequency);
  
  }
--- 151,155 ----
  
  
! 	sleep ($sleepSeconds * $agentFrequency);
  
  }