[prev in list] [next in list] [prev in thread] [next in thread] 

List:       apreq-dev
Subject:    [apreq-2] glue/perl cookie test
From:       Randy Kobes <randy () theoryx5 ! uwinnipeg ! ca>
Date:       2003-11-13 6:34:59
[Download RAW message or body]

Hi,
   With the current cvs, I get a failure in a couple
of the glue/perl cookie tests, due to some warnings
about uninitialized values. This diff:
======================================================
Index: t/response/TestApreq/cookie.pm
===================================================================
RCS file: /home/cvs/httpd-apreq-2/glue/perl/t/response/TestApReq/cookie.pm,v
retrieving revision 1.8
diff -u -r1.8 cookie.pm
--- t/response/TestApreq/cookie.pm	13 Nov 2003 04:05:20 -0000	1.8
+++ t/response/TestApreq/cookie.pm	13 Nov 2003 06:34:46 -0000
@@ -20,7 +20,7 @@
     my $test = $req->param('test');
     my $key  = $req->param('key');

-    if ($cookies{$key}) {
+    if ($key and $cookies{$key}) {
         if ($test eq "bake") {
             $cookies{$key}->bake;
         }
==============================================================
fixes that.

-- 
best regards,
randy
[prev in list] [next in list] [prev in thread] [next in thread]