From 1b7d5d88a632396d98fc50ec2dc21b3889555bf9 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Dagfinn=20Ilmari=20Manns=C3=A5ker?= Date: Tue, 24 Jan 2017 17:48:01 +0000 Subject: Use the core-provided Digest::SHA instead of Digest::SHA1 --- cpanfile | 2 +- lib/Sietima/MailStore/FS.pm | 2 +- t/lib/Test/Sietima/MailStore.pm | 2 +- 3 files changed, 3 insertions(+), 3 deletions(-) diff --git a/cpanfile b/cpanfile index 626b330..f869156 100644 --- a/cpanfile +++ b/cpanfile @@ -2,7 +2,7 @@ # -*- mode: perl -*- requires 'perl','>= 5.024'; requires 'App::Spec'; -requires 'Digest::SHA1'; +requires 'Digest::SHA'; requires 'Email::Address'; requires 'Email::MIME'; requires 'Email::Sender'; diff --git a/lib/Sietima/MailStore/FS.pm b/lib/Sietima/MailStore/FS.pm index d4e6ec1..e4dfc4d 100644 --- a/lib/Sietima/MailStore/FS.pm +++ b/lib/Sietima/MailStore/FS.pm @@ -5,7 +5,7 @@ use Types::Path::Tiny qw(Dir); use Types::Standard qw(Object ArrayRef Str slurpy); use Type::Params qw(compile); use Sietima::Types qw(EmailMIME TagName); -use Digest::SHA1 qw(sha1_hex); +use Digest::SHA qw(sha1_hex); use namespace::clean; with 'Sietima::MailStore'; diff --git a/t/lib/Test/Sietima/MailStore.pm b/t/lib/Test/Sietima/MailStore.pm index 64c7b41..df4fb03 100644 --- a/t/lib/Test/Sietima/MailStore.pm +++ b/t/lib/Test/Sietima/MailStore.pm @@ -2,7 +2,7 @@ package Test::Sietima::MailStore; use Moo; use Sietima::Policy; use List::AllUtils qw(all first_index); -use Digest::SHA1 qw(sha1_hex); +use Digest::SHA qw(sha1_hex); use namespace::clean; with 'Sietima::MailStore'; -- cgit v1.2.3