ubuntu and debian ship SHA.pm instand of SHA1.pm

git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@16913 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
2013-07-09 07:20:57 +00:00
parent e5e572f940
commit 0db7fd3e4a
1 changed files with 12 additions and 2 deletions
--- a/xCAT-buildkit/lib/perl/xCAT/BuildKitUtils.pm
+++ b/xCAT-buildkit/lib/perl/xCAT/BuildKitUtils.pm
@@ -19,10 +19,20 @@ use File::Path;
 use Socket;
 use strict;
 use Symbol;
-my $sha1support = eval {
+my $sha1support;
+if ( -f "/etc/debian_version" ) {
+    $sha1support = eval {
+        require Digest::SHA;
+        1;
+    };
+}
+else {
+
+    $sha1support = eval {
 	require Digest::SHA1;
 	1;
-};
+    };
+}
 use IPC::Open3;
 use IO::Select;
 use warnings "all";