|
From: Bob T. <bt...@us...> - 2001-06-05 04:04:23
|
Update of /cvsroot/benson/benson2/src
In directory usw-pr-cvs1:/tmp/cvs-serv1035/src
Modified Files:
alertlist.cc
Log Message:
Added some database hooks, cleaned up some of the alertlist code and bensonctl so that it respects the Port config option
Index: alertlist.cc
===================================================================
RCS file: /cvsroot/benson/benson2/src/alertlist.cc,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -r1.3 -r1.4
*** alertlist.cc 2001/04/08 01:41:57 1.3
--- alertlist.cc 2001/06/05 01:47:56 1.4
***************
*** 57,61 ****
if((argc - optind) == 0) {
! destination = "inet:" + destination + ":9021";
if(verbose) {
--- 57,62 ----
if((argc - optind) == 0) {
! string port = SvPVX(perl_object->get(srvref, "Port"));
! destination = "inet:" + destination + ":" + port;
if(verbose) {
|