File: use-Digest-SHA.patch

package info (click to toggle)
libcrypt-hcesha-perl 0.70-3
  • links: PTS
  • area: main
  • in suites: jessie, jessie-kfreebsd, wheezy
  • size: 128 kB
  • ctags: 38
  • sloc: perl: 613; makefile: 2
file content (48 lines) | stat: -rw-r--r-- 1,770 bytes parent folder | download
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
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
Author: Salvatore Bonaccorso <carnil@debian.org>
Description: digest-sha-perl-transition (Closes: #635178)
Bug: https://rt.cpan.org/Public/Bug/Display.html?id=67841

diff -urN libcrypt-hcesha-perl-0.70.orig//HCE_SHA.pm libcrypt-hcesha-perl-0.70/HCE_SHA.pm
--- libcrypt-hcesha-perl-0.70.orig//HCE_SHA.pm	2004-03-26 16:27:58.000000000 +0100
+++ libcrypt-hcesha-perl-0.70/HCE_SHA.pm	2011-04-29 20:42:11.309252526 +0200
@@ -10,7 +10,7 @@
 use strict;
 use vars qw($VERSION @ISA @EXPORT @EXPORT_OK);
 
-use Digest::SHA1;
+use Digest::SHA;
 use MIME::Base64;
 use Carp;
 
@@ -46,7 +46,7 @@
     my $self = shift;
     my ($rnd) = @_;
  
-    my $context = new Digest::SHA1;
+    my $context = new Digest::SHA;
     $context->add($self->{SKEY}, $rnd);
     my $digest = $context->digest();
     my @e_block = unpack('C*', $digest);
diff -urN libcrypt-hcesha-perl-0.70.orig//META.yml libcrypt-hcesha-perl-0.70/META.yml
--- libcrypt-hcesha-perl-0.70.orig//META.yml	2004-03-26 16:28:13.000000000 +0100
+++ libcrypt-hcesha-perl-0.70/META.yml	2011-04-29 20:42:17.622499154 +0200
@@ -5,7 +5,7 @@
 version_from: HCE_SHA.pm
 installdirs:  site
 requires:
-    Digest::SHA1:                  0
+    Digest::SHA:                  0
     MIME::Base64:                  2
 
 distribution_type: module
diff -urN libcrypt-hcesha-perl-0.70.orig//Makefile.PL libcrypt-hcesha-perl-0.70/Makefile.PL
--- libcrypt-hcesha-perl-0.70.orig//Makefile.PL	2003-11-13 00:24:46.000000000 +0100
+++ libcrypt-hcesha-perl-0.70/Makefile.PL	2011-04-29 20:42:25.417251532 +0200
@@ -4,6 +4,6 @@
 WriteMakefile(
     'NAME'	=> 'Crypt::HCE_SHA',
     'VERSION_FROM' => 'HCE_SHA.pm', # finds $VERSION
-    'PREREQ_PM' => {'Digest::SHA1' => 0,
+    'PREREQ_PM' => {'Digest::SHA' => 0,
 		    'MIME::Base64' => 2}
 );