diff --git a/pelab/bgmon/libwanetmon.pm b/pelab/bgmon/libwanetmon.pm index e3fefa477e89bce0b15cf897e3ef4a0a76347b97..60825c4ecb347aacbace7f2fd4d18e47dd236478 100644 --- a/pelab/bgmon/libwanetmon.pm +++ b/pelab/bgmon/libwanetmon.pm @@ -135,7 +135,7 @@ sub sendcmd($$) if( !defined $cmd{managerID} ){ $cmd{managerID} = "default"; } - if( !defined $cmd{expid} ){ + if( defined($expid) && !defined $cmd{expid} ){ $cmd{expid} = $expid; } @@ -206,9 +206,12 @@ sub sendcmd_evsys($$$;$) if( !defined $manType ){ $manType = "managerclient"; } - print "manType = $manType\n"; + if( defined($expid) && !defined $cmd{expid} ){ + $cmd{expid} = $expid; + } + # # This is the evsys command to send #