Changeset 10928

Timestamp:

05/02/08 14:08:54 (5 years ago)

Author:

daisuke

Message:

we need a slot to hold Apache::RequestRec?

Files:

• lang/perl/HTTP-Engine/branches/moose/lib/HTTP/Engine/Interface/ModPerl.pm (modified) (2 diffs)

lang/perl/HTTP-Engine/branches/moose/lib/HTTP/Engine/Interface/ModPerl.pm

@@ -16 +16 @@
 extends 'HTTP::Engine::Interface::CGI';
 
+has 'apache' => (
+    isa => 'Apache2::RequestRec'
+);
+
 my %HE;
 
@@ -32 +36 @@
     }
 
+    $engine->interface->apache( $r );
     $engine->run();
 }