[Mon-commit] mon mon,1.4.2.4,1.4.2.5

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

Update of /cvsroot/mon/mon
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv20141

Modified Files:
      Tag: mon-1-0-0pre1
	mon 
Log Message:


fixed a bug which would prevent alerts or upalerts
from being sent when call alerts is passed the "output"
argument whose value is undef


Index: mon
===================================================================
RCS file: /cvsroot/mon/mon/mon,v
retrieving revision 1.4.2.4
retrieving revision 1.4.2.5
diff -C2 -d -r1.4.2.4 -r1.4.2.5
*** mon	18 Jun 2004 20:31:29 -0000	1.4.2.4
--- mon	24 Jun 2004 14:02:49 -0000	1.4.2.5
***************
*** 4528,4532 ****
  		retval alert output
  	    )) {
!     	return (undef) if (!defined $args{$mandatory_arg});
      }
  
--- 4528,4536 ----
  		retval alert output
  	    )) {
! 	if (!exists $args{$mandatory_arg})
! 	{
! 	    debug (1, "returning from call_alert because of missing arg $mandatory_arg\n");
! 	    return (undef);
! 	}
      }