]> git.donarmstrong.com Git - deb_pkgs/libapache-gallery-perl.git/blobdiff - lib/Apache/Gallery.pm
import Apache2::Const::REDIRECT
[deb_pkgs/libapache-gallery-perl.git] / lib / Apache / Gallery.pm
index 3cb6e5638bb45dd3bf2c042ff786b0c7ef2435dd..99eb42311f0e732e142e68098c277a829e2c4a3a 100644 (file)
@@ -25,7 +25,8 @@ BEGIN {
                require Apache2::SubRequest;
                require Apache2::Const;
        
-               Apache2::Const->import(-compile => 'OK','DECLINED','FORBIDDEN','NOT_FOUND','HTTP_NOT_MODIFIED');
+               Apache2::Const->import(-compile => 'OK','DECLINED','FORBIDDEN',
+                               'NOT_FOUND','HTTP_NOT_MODIFIED', 'REDIRECT');
 
                $::MP2 = 1;
        } else {
@@ -166,7 +167,8 @@ sub handler {
        unless ($doc_pattern) {
                $doc_pattern = '\.(mpe?g|avi|mov|asf|wmv|doc|mp3|mp4|ogg|pdf|rtf|wav|dlt|txt|html?|csv|eps)$'
        }
-       my $img_pattern = $r->dir_config('GalleryImgFile')      unless ($img_pattern) {
+       my $img_pattern = $r->dir_config('GalleryImgFile');
+       unless ($img_pattern) {
                $img_pattern = '\.(jpe?g|png|tiff?|ppm)$'
        }