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
This commit is contained in:
xq2005 2013-07-09 03:24:32 +00:00
parent f40260f9cb
commit 5779f4e927

View File

@ -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;