aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--lib/Apache/Inject.pm25
-rw-r--r--lib/Apache/Inject/Handler.pm3
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