minor fix for a compiler warning
git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@7241 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
This commit is contained in:
parent
33551a0e53
commit
44271467a0
@ -5,8 +5,8 @@ BEGIN
|
||||
{
|
||||
$::XCATROOT = $ENV{'XCATROOT'} ? $ENV{'XCATROOT'} : '/opt/xcat';
|
||||
}
|
||||
use lib "$::XCATROOT/lib/perl";
|
||||
|
||||
use lib "$::XCATROOT/lib/perl";
|
||||
use xCAT::Table;
|
||||
use xCAT::MsgUtils;
|
||||
use xCAT::Utils;
|
||||
@ -72,7 +72,7 @@ sub unregMonitoringNotif {
|
||||
my $tab = xCAT::Table->new('notification');
|
||||
my $regged=0;
|
||||
if ($tab) {
|
||||
(my $ref) = $tab->getAttribs({filename => qw(montbhandler.pm)}, tables);
|
||||
(my $ref) = $tab->getAttribs({filename => qw(montbhandler.pm)}, "tables");
|
||||
if ($ref and $ref->{tables}) {
|
||||
$regged=1;
|
||||
}
|
||||
|
Loading…
Reference in New Issue
Block a user