You are viewing a plain text version of this content. The canonical link for it is here.
Posted to embperl@perl.apache.org by Gerald Richter <ri...@ecos.de> on 2002/06/25 21:34:00 UTC

Re: Apache::SessionX make test fails

Hi,



> I am having the same issue referenced in the following message:
>
> http://www.ecos.de/~mailarc/embperl/2002-02/msg00122.html
>
> well, the first part anyway... the make test issue...
>
> is there a known fix/workaround for this problem? im trying to get embperl
> up and running with session support
>

I append you a fix from T.J. Mather, hopefully I have soon time to release a
fixed version

Gerald


----- Original Message -----
From: "T.J. Mather" <tj...@maxmind.com>
To: <ri...@ecos.de>
Sent: Monday, May 13, 2002 4:16 AM
Subject: Apache::SessionX fix


> This patch fixes a bug related to an API change in Digest::MD5.  The error
> that it fixes is:
>  Undefined subroutine &Apache::SessionX::Generate::MD5::generate
>
> Note that this is the error in this e-mail thread:
> http://www.ecos.de/~mailarc/embperl/2002-02/msg00121.html
>
> Thanks,
> TJ
>
> Here's the patch:
>
> --- /tmp/MD5.pm Sun May 12 22:13:34 2002
> +++ /usr/lib/perl5/site_perl/5.6.0/Apache/SessionX/Generate/MD5.pm
> Sun May 12 22:12:57 2002
> @@ -12,7 +12,7 @@
>
>  use strict;
>  use vars qw($VERSION);
> -use MD5;
> +use Digest::MD5;
>
>  $VERSION = '2.1';
>
> @@ -26,7 +26,7 @@
>      }
>
>      $session->{data}->{_session_id} =
> -        substr(MD5->hexhash(MD5->hexhash($arg || (time(). {}. rand().
$$))), 0, $length);
> +        substr(Digest::MD5::md5_hex(Digest::MD5::md5_hex($arg || (time().
{}. rand(). $$))), 0, $length);
>
>
>  }
>
>

-------------------------------------------------------------
Gerald Richter    ecos electronic communication services gmbh
Internetconnect * Webserver/-design/-datenbanken * Consulting

Post:       Tulpenstrasse 5         D-55276 Dienheim b. Mainz
E-Mail:     richter@ecos.de         Voice:    +49 6133 925131
WWW:        http://www.ecos.de      Fax:      +49 6133 925152
-------------------------------------------------------------



---------------------------------------------------------------------
To unsubscribe, e-mail: embperl-unsubscribe@perl.apache.org
For additional commands, e-mail: embperl-help@perl.apache.org