[Mon-commit] mon mon,1.6,1.7

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

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

Modified Files:
	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.6
retrieving revision 1.7
diff -C2 -d -r1.6 -r1.7
*** mon	24 Jun 2004 19:09:26 -0000	1.6
--- mon	24 Jun 2004 19:11:54 -0000	1.7
***************
*** 5014,5019 ****
  		group service flags
  		retval alert output
! 	    )) {
!     	return (undef) if (!defined $args{$mandatory_arg});
      }
  
--- 5014,5024 ----
  		group service flags
  		retval alert output
! 	    ))
!     {
!         if (!exists $args{$mandatory_arg})
!         {   
!             debug (1, "returning from call_alert because of missing arg $mandatory_arg\n");
!             return (undef);
!         }
      }