- if( ( $blosxom::path_info =~ m!^(.*?/?)([^/]*?\.?)([^\.]*?)$! ) &&
- ( -e "$blosxom::datadir/$1$2$3" ) && (! -d "$blosxom::datadir/$1$2$3" ) )
- {
- # access path and name, name and extension of the file
- $fileaccess = "$blosxom::datadir/$1$2$3" ;
- # adequate file extension ?
- if ( grep(/$3/, @exclude_extensions_dynamic) ) {return 0 ;}
- my MIME::Types $types = MIME::Types->new;
- my MIME::Type $mimetype = $types->mimeTypeOf($blosxom::flavour);
- $blosxom::header =
+ if ( ($blosxom::path_info =~ m!^(.*?/?)([^/]*?\.?)([^\.]*?)$!) &&
+ ($blosxom::others{"$blosxom::datadir/$1$2$3"} || $blosxom::files{"$blosxom::datadir/$1$2$3"}) )
+ {
+ # access path and name, name and extension of the file
+ my $fileaccess = "$blosxom::datadir/$1$2$3" ;
+ # adequate file extension ?
+ if ( grep(/^$3$/, @exclude_extensions_dynamic) ) {return 0 ;}
+ my MIME::Types $types = MIME::Types->new;
+ my MIME::Type $mimetype = $types->mimeTypeOf($blosxom::flavour);
+ $blosxom::header =