1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
|
Description: Switch from Digest::SHA1 -> Digest::SHA
Forwarded: https://github.com/stevan/plack-middleware-session/pull/18/files
Author: Dave Walker (Daviey) <DaveWalker@ubuntu.com>
Reviewed-by: gregor herrmann <gregoa@debian.org>
Last-Update: 2015-07-11
--- a/lib/Plack/Session/State.pm
+++ b/lib/Plack/Session/State.pm
@@ -5,7 +5,7 @@
our $VERSION = '0.30';
our $AUTHORITY = 'cpan:STEVAN';
-use Digest::SHA1 ();
+use Digest::SHA ();
use Plack::Request;
use Plack::Util::Accessor qw[
@@ -19,7 +19,7 @@
$params{'session_key'} ||= 'plack_session';
$params{'sid_generator'} ||= sub {
- Digest::SHA1::sha1_hex(rand() . $$ . {} . time)
+ Digest::SHA::sha1_hex(rand() . $$ . {} . time)
};
$params{'sid_validator'} ||= qr/\A[0-9a-f]{40}\Z/;
|
