From 061eb10d562636be7b7dee2a0ab82acab490ae1b Mon Sep 17 00:00:00 2001
From: sakolish <sakolish@8638fb3e-16cb-4fca-ae20-7b5d299a9bcd>
Date: Mon, 18 Feb 2008 20:35:32 +0000
Subject: [PATCH] Return errorcode on exit - Line #43

git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@517 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
---
 xCAT-server-2.0/lib/xcat/plugins/fsp.pm | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

diff --git a/xCAT-server-2.0/lib/xcat/plugins/fsp.pm b/xCAT-server-2.0/lib/xcat/plugins/fsp.pm
index 58a9bb051..df2ac2bb1 100644
--- a/xCAT-server-2.0/lib/xcat/plugins/fsp.pm
+++ b/xCAT-server-2.0/lib/xcat/plugins/fsp.pm
@@ -38,7 +38,11 @@ sub process_request {
     eval { require Net::SSL };
     if ( $@ ) {
         my $callback = $_[1];
-        $callback->( {data=>[$@]} );
+        my %output;
+
+        $output{errorcode} = 1;
+        $output{data} = [$@];
+        $callback->( \%output );
         return(1);
     }
     xCAT::PPC::process_request(__PACKAGE__,@_);