From 5acfff061822d0a1a0d98a5507088855ad80ac00 Mon Sep 17 00:00:00 2001
From: sakolish <sakolish@8638fb3e-16cb-4fca-ae20-7b5d299a9bcd>
Date: Thu, 10 Jan 2008 14:34:34 +0000
Subject: [PATCH] Changed module load error - Line #640

git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@240 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
---
 perl-xCAT-2.0/xCAT/PPC.pm | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/perl-xCAT-2.0/xCAT/PPC.pm b/perl-xCAT-2.0/xCAT/PPC.pm
index d7397217b..99c0081f7 100644
--- a/perl-xCAT-2.0/xCAT/PPC.pm
+++ b/perl-xCAT-2.0/xCAT/PPC.pm
@@ -636,8 +636,9 @@ sub runcmd {
     ######################################
     # Load specific module
     ######################################
-    unless ( eval "require $modname" ) {
-        return( ["Can't locate $modname"] );
+    eval "require $modname";
+    if ( $@ ) {
+        return( [$@] );
     }
     ######################################
     # Invoke  method