use Digest::SHA instead of Digest::SHA1
This commit is contained in:
2
Makefile
2
Makefile
@ -2,7 +2,7 @@ RELEASE=2.0
|
|||||||
|
|
||||||
VERSION=2.0
|
VERSION=2.0
|
||||||
PACKAGE=libpve-storage-perl
|
PACKAGE=libpve-storage-perl
|
||||||
PKGREL=13
|
PKGREL=14
|
||||||
|
|
||||||
DESTDIR=
|
DESTDIR=
|
||||||
PREFIX=/usr
|
PREFIX=/usr
|
||||||
|
|||||||
@ -13,7 +13,7 @@ use IPC::Open2;
|
|||||||
use Cwd 'abs_path';
|
use Cwd 'abs_path';
|
||||||
use Getopt::Long qw(GetOptionsFromArray);
|
use Getopt::Long qw(GetOptionsFromArray);
|
||||||
use Socket;
|
use Socket;
|
||||||
use Digest::SHA1;
|
use Digest::SHA;
|
||||||
use Net::Ping;
|
use Net::Ping;
|
||||||
|
|
||||||
use PVE::Tools qw(run_command file_read_firstline trim);
|
use PVE::Tools qw(run_command file_read_firstline trim);
|
||||||
@ -419,7 +419,7 @@ sub parse_config {
|
|||||||
|
|
||||||
my $ids = {};
|
my $ids = {};
|
||||||
|
|
||||||
my $digest = Digest::SHA1::sha1_hex(defined($raw) ? $raw : '');
|
my $digest = Digest::SHA::sha1_hex(defined($raw) ? $raw : '');
|
||||||
|
|
||||||
my $pri = 0;
|
my $pri = 0;
|
||||||
|
|
||||||
|
|||||||
@ -1,3 +1,9 @@
|
|||||||
|
libpve-storage-perl (2.0-14) unstable; urgency=low
|
||||||
|
|
||||||
|
* use Digest::SHA instead of Digest::SHA1
|
||||||
|
|
||||||
|
-- Proxmox Support Team <support@proxmox.com> Tue, 20 Mar 2012 11:27:24 +0100
|
||||||
|
|
||||||
libpve-storage-perl (2.0-13) unstable; urgency=low
|
libpve-storage-perl (2.0-13) unstable; urgency=low
|
||||||
|
|
||||||
* new lvm option 'saferemove' to zero-out data when removing LVs
|
* new lvm option 'saferemove' to zero-out data when removing LVs
|
||||||
|
|||||||
Reference in New Issue
Block a user