fix exit constants usage in apache2

[perl/plp/.git] / PLP / Apache.pm

diff --git a/PLP/Apache.pm b/PLP/Apache.pm
index b1744860021a55efe13215389cd7b0bb4be56e87..835f2b4c82ac6e64eed361f1f680b3729f5dd96a 100644 (file)
--- a/PLP/Apache.pm
+++ b/PLP/Apache.pm
@@ -16,6 +16,9 @@ BEGIN {
                require Apache2::RequestRec;
                require Apache2::RequestUtil;
                require Apache2::RequestIO;
+               Apache2::Const->import(-compile => qw(
+                       HTTP_NOT_FOUND HTTP_FORBIDDEN OK
+               ));
        } else {
                require Apache::Constants;
        }