mon-commit

[Jim T. <tr...@us...>]

Update of /cvsroot/mon/mon/mon.d
In directory sc8-pr-cvs16:/tmp/cvs-serv31786/mon.d

Modified Files:
      Tag: mon-1-2-branch
	mon.monitor nntp.monitor 
Log Message:
snpp use strict fix, mon.cgi ack display fix, mon.monitor option fix, nntp -f fix, all from augie

Index: nntp.monitor
===================================================================
RCS file: /cvsroot/mon/mon/mon.d/nntp.monitor,v
retrieving revision 1.2
retrieving revision 1.2.2.1
diff -C2 -d -r1.2 -r1.2.2.1
*** nntp.monitor	17 Apr 2005 07:42:27 -0000	1.2
--- nntp.monitor	3 May 2007 19:55:40 -0000	1.2.2.1
***************
*** 54,58 ****
  $PORT = $opt_p || 119;
  $TIMEOUT = $opt_t || 30;
! $FEEDER = $opt{"f"};
  $DEBUG = $opt_d || "";
  $USER = $opt_u || '';
--- 54,58 ----
  $PORT = $opt_p || 119;
  $TIMEOUT = $opt_t || 30;
! $FEEDER = $opt_f;
  $DEBUG = $opt_d || "";
  $USER = $opt_u || '';

Index: mon.monitor
===================================================================
RCS file: /cvsroot/mon/mon/mon.d/mon.monitor,v
retrieving revision 1.1.1.1
retrieving revision 1.1.1.1.4.1
diff -C2 -d -r1.1.1.1 -r1.1.1.1.4.1
*** mon.monitor	9 Jun 2004 05:18:05 -0000	1.1.1.1
--- mon.monitor	3 May 2007 19:55:39 -0000	1.1.1.1.4.1
***************
*** 15,19 ****
  
  my %opt;
! getopts ('u:p:p:t:', \%opt);
  
  my @failures;
--- 15,19 ----
  
  my %opt;
! getopts ('u:p:P:t:', \%opt);
  
  my @failures;
***************
*** 47,55 ****
  	}
  
! 	if ($opt{"u"} && $opt{"p"})
  	{
  	    if (! defined $c->login (
  		    "username"	=> $opt{"u"},
! 		    "password"	=> $opt{"p"},
  		))
  	    {
--- 47,55 ----
  	}
  
! 	if ($opt{"u"} && $opt{"P"})
  	{
  	    if (! defined $c->login (
  		    "username"	=> $opt{"u"},
! 		    "password"	=> $opt{"P"},
  		))
  	    {