From 5779f4e927dc39032165858bc539a244ce6e3e8a Mon Sep 17 00:00:00 2001
From: xq2005 <xq2005@8638fb3e-16cb-4fca-ae20-7b5d299a9bcd>
Date: Tue, 9 Jul 2013 03:24:32 +0000
Subject: [PATCH] ubuntu and debian does release SHA.pm instand of SHA1.pm

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

diff --git a/perl-xCAT/xCAT/Utils.pm b/perl-xCAT/xCAT/Utils.pm
index c1b1725cc..d37ebdb19 100644
--- a/perl-xCAT/xCAT/Utils.pm
+++ b/perl-xCAT/xCAT/Utils.pm
@@ -21,12 +21,12 @@ use File::Path;
 use Socket;
 use strict;
 use Symbol;
-my $sha1support = eval {
-	require Digest::SHA1;
-	1;
-};
+my $sha1support;
 if ( -f "/etc/debian_version" ){
-    $sha1support = eval {require Digest::SHA; 1;}
+    $sha1support = eval {require Digest::SHA; 1;};
+}
+else {
+    $sha1support = eval { require Digest::SHA1; 1;};
 }
 use IPC::Open3;
 use IO::Select;