Index: /trunk/lib/Mungo.pm =================================================================== --- /trunk/lib/Mungo.pm (revision 49) +++ /trunk/lib/Mungo.pm (revision 51) @@ -222,4 +222,5 @@ $self = __PACKAGE__; } + my $preamble_class = $r->dir_config('MungoPreamble'); # Short circuit if we can't find the file. return NOT_FOUND() if(! -r $r->filename); @@ -229,8 +230,14 @@ local $SIG{__DIE__} = \&Mungo::wrapErrorsInObjects; eval { + my $doit = Apache2::Const::DECLINED; $main::Request = $self->Request(); $main::Response = $self->Response(); $main::Server = $self->Server(); - $self->Response()->Include($r->filename); + if($preamble_class) { + $doit = $preamble_class->handler($r, $self->Request(), + $self->Response(), $self->Server()); + } + $self->Response()->Include($r->filename) + if($doit == Apache2::Const::DECLINED); }; if($@) {