You are viewing a plain text version of this content. The canonical link for it is here.
Posted to modperl-cvs@perl.apache.org by do...@apache.org on 2001/08/30 03:05:41 UTC

cvs commit: modperl-2.0/t/hooks/TestHooks trans.pm

dougm       01/08/29 18:05:41

  Modified:    t/hooks/TestHooks trans.pm
  Log:
  current httpd-2.0 requires trans handlers to either set r->filename or implement a map_to_storage hook
  
  Revision  Changes    Path
  1.2       +3 -1      modperl-2.0/t/hooks/TestHooks/trans.pm
  
  Index: trans.pm
  ===================================================================
  RCS file: /home/cvs/modperl-2.0/t/hooks/TestHooks/trans.pm,v
  retrieving revision 1.1
  retrieving revision 1.2
  diff -u -r1.1 -r1.2
  --- trans.pm	2001/04/13 02:05:58	1.1
  +++ trans.pm	2001/08/30 01:05:41	1.2
  @@ -10,7 +10,9 @@
           Apache::OK;
       },
       '/phooey' => sub {
  -        shift->uri('/TestHooks::trans');
  +        my $r = shift;
  +        $r->filename(__FILE__); #filename is currently required
  +        $r->uri('/TestHooks::trans');
           Apache::OK;
       },
   );