From 5f5a306c4ec234a74e47aae327c4824de04cd0c6 Mon Sep 17 00:00:00 2001 From: =?utf8?q?Jan=20R=C4=99korajski?= Date: Mon, 30 Apr 2001 22:49:22 +0000 Subject: [PATCH] - use Digest::MD5 instead of obsolete MD5 Changed files: perl-libwww-Digest-MD5.patch -> 1.1 --- perl-libwww-Digest-MD5.patch | 21 +++++++++++++++++++++ 1 file changed, 21 insertions(+) create mode 100644 perl-libwww-Digest-MD5.patch diff --git a/perl-libwww-Digest-MD5.patch b/perl-libwww-Digest-MD5.patch new file mode 100644 index 0000000..9305a2e --- /dev/null +++ b/perl-libwww-Digest-MD5.patch @@ -0,0 +1,21 @@ +diff -ur libwww-perl-5.53.orig/lib/LWP/Authen/Digest.pm libwww-perl-5.53/lib/LWP/Authen/Digest.pm +--- libwww-perl-5.53.orig/lib/LWP/Authen/Digest.pm Tue Jan 23 03:41:01 2001 ++++ libwww-perl-5.53/lib/LWP/Authen/Digest.pm Tue May 1 00:36:59 2001 +@@ -1,7 +1,7 @@ + package LWP::Authen::Digest; + use strict; + +-require MD5; ++require Digest::MD5; + + sub authenticate + { +@@ -18,7 +18,7 @@ + my $uri = $request->url->path_query; + $uri = "/" unless length $uri; + +- my $md5 = new MD5; ++ my $md5 = new Digest::MD5; + + my(@digest); + $md5->add(join(":", $user, $auth_param->{realm}, $pass)); -- 2.43.0