arif/xcat-core
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

-Fix xen plugin compile error

Browse Source 
git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@2901 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
This commit is contained in:
jbjohnso 2009-03-14 15:52:28 +00:00
parent c64f1f819e
commit 676c5e2a57
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
xCAT-server/lib/xcat/plugins/xen.pm
View File

@ -647,6 +647,8 @@ sub process_request {
#makes sense to check it here anyway, this way we avoid the main process
#sucking up ram with Sys::Virt
my $libvirtsupport = eval { require Sys::Virt; };
my $request = shift;
my $callback = shift;
unless ($libvirtsupport) { #Still no Sys::Virt module
$callback->({error=>"Sys::Virt perl module missing, unable to fulfill Xen plugin requirements",errorcode=>[42]});
return [];
@ -654,8 +656,6 @@ sub process_request {
require Sys::Virt::Domain;
%runningstates = (&Sys::Virt::Domain::STATE_NOSTATE=>1,&Sys::Virt::Domain::STATE_RUNNING=>1,&Sys::Virt::Domain::STATE_BLOCKED=>1);
my $request = shift;
my $callback = shift;
$doreq = shift;
my $level = shift;
my $noderange = $request->{node};