From 29ce8ffd813816dfcb2cafb45efd07b6f0a4ddf5 Mon Sep 17 00:00:00 2001 From: linggao Date: Thu, 29 Mar 2012 19:07:28 +0000 Subject: [PATCH] fixed the compiling error git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/branches/2.7@12056 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd --- xCAT-server/lib/xcat/plugins/pxe.pm | 3 ++- xCAT-server/lib/xcat/plugins/xnba.pm | 3 ++- xCAT-server/lib/xcat/plugins/yaboot.pm | 3 ++- 3 files changed, 6 insertions(+), 3 deletions(-) diff --git a/xCAT-server/lib/xcat/plugins/pxe.pm b/xCAT-server/lib/xcat/plugins/pxe.pm index edf491639..2042514c7 100644 --- a/xCAT-server/lib/xcat/plugins/pxe.pm +++ b/xCAT-server/lib/xcat/plugins/pxe.pm @@ -42,7 +42,8 @@ sub check_dhcp { } sub _slow_get_tftpdir { #make up for paths where tftpdir is not passed in - my $nrtab = = xCAT::Table->new('noderes',-create=>0); #in order to detect per-node tftp directories + my $node = shift; + my $nrtab = xCAT::Table->new('noderes',-create=>0); #in order to detect per-node tftp directories unless ($nrtab) { return $globaltftpdir; } my $ent = $nrtab->getNodeAttribs($node,["tftpdir"]); if ($ent and $ent->{tftpdir}) { diff --git a/xCAT-server/lib/xcat/plugins/xnba.pm b/xCAT-server/lib/xcat/plugins/xnba.pm index 1fed7d27d..bc9f339ef 100644 --- a/xCAT-server/lib/xcat/plugins/xnba.pm +++ b/xCAT-server/lib/xcat/plugins/xnba.pm @@ -43,7 +43,8 @@ sub check_dhcp { } sub _slow_get_tftpdir { #make up for paths where tftpdir is not passed in - my $nrtab = = xCAT::Table->new('noderes',-create=>0); #in order to detect per-node tftp directories + my $node=shift; + my $nrtab = xCAT::Table->new('noderes',-create=>0); #in order to detect per-node tftp directories unless ($nrtab) { return $globaltftpdir; } my $ent = $nrtab->getNodeAttribs($node,["tftpdir"]); if ($ent and $ent->{tftpdir}) { diff --git a/xCAT-server/lib/xcat/plugins/yaboot.pm b/xCAT-server/lib/xcat/plugins/yaboot.pm index 986cf9c26..79b2f41c3 100644 --- a/xCAT-server/lib/xcat/plugins/yaboot.pm +++ b/xCAT-server/lib/xcat/plugins/yaboot.pm @@ -44,7 +44,8 @@ sub check_dhcp { } sub _slow_get_tftpdir { #make up for paths where tftpdir is not passed in - my $nrtab = = xCAT::Table->new('noderes',-create=>0); #in order to detect per-node tftp directories + my $node = shift; + my $nrtab = xCAT::Table->new('noderes',-create=>0); #in order to detect per-node tftp directories unless ($nrtab) { return $globaltftpdir; } my $ent = $nrtab->getNodeAttribs($node,["tftpdir"]); if ($ent and $ent->{tftpdir}) {