diff options
Diffstat (limited to 'lib/Apache')
-rw-r--r-- | lib/Apache/Inject.pm | 25 | ||||
-rw-r--r-- | lib/Apache/Inject/Handler.pm | 3 |
2 files changed, 25 insertions, 3 deletions
diff --git a/lib/Apache/Inject.pm b/lib/Apache/Inject.pm index 73b88a4..e82e174 100644 --- a/lib/Apache/Inject.pm +++ b/lib/Apache/Inject.pm @@ -1,8 +1,11 @@ package Apache::Inject; +use 5.008000; use strict; use warnings; +our $VERSION = '0.01'; + use Apache2::CmdParms (); use Apache2::Module (); use Apache2::Const qw/OR_LIMIT OR_AUTHCFG TAKE12/; @@ -35,7 +38,6 @@ sub Inject { 1; __END__ - =head1 NAME Apache::Inject - Apache directive for injecting HTML headers and footers @@ -85,6 +87,7 @@ All of them result in Apache::Inject::Handler declining the request, letting Apache handle it as it would if the Inject directive were not used. =over + =item Error: InjectHead/InjectFoot should not begin with slash, as it is already always relative to document root The paths given to Inject are always relative to the document root, @@ -111,5 +114,23 @@ cannot retrieve the current document root from Apache. =back -=cut +=head1 CAVEATS + +On FreeBSD, you need to enable the accf_http kernel module +in order for the tests to work. +Note that Apache::Inject works fine without the module; +it is only the tests that require it. + +=head1 AUTHOR +John Ankarström, E<lt>john [at] ankarstrom.se<gt> + +=head1 COPYRIGHT AND LICENSE + +Copyright (C) 2021 by John Ankarström + +This library is free software; you can redistribute it and/or modify +it under the same terms as Perl itself, either Perl version 5.32.1 or, +at your option, any later version of Perl 5 you may have available. + +=cut diff --git a/lib/Apache/Inject/Handler.pm b/lib/Apache/Inject/Handler.pm index 7c32a61..6c1a282 100644 --- a/lib/Apache/Inject/Handler.pm +++ b/lib/Apache/Inject/Handler.pm @@ -2,9 +2,10 @@ package Apache::Inject::Handler; use strict; +use Apache2::Const qw/OK DECLINED/; +use Apache2::Log (); use Apache2::RequestRec (); use Apache2::RequestUtil (); -use Apache2::Const qw/OK DECLINED/; my $doc = qr{ \A |