From 0bcc23084d080e312003562c124d06598909cc1a Mon Sep 17 00:00:00 2001 From: Barijaona Ramaholimihaso Date: Sun, 9 Sep 2007 14:18:39 +0000 Subject: [PATCH] Bugfix for checking excluded extensions (static) --- barijaona/static_file | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/barijaona/static_file b/barijaona/static_file index 77397d6..d3f5a8f 100644 --- a/barijaona/static_file +++ b/barijaona/static_file @@ -25,7 +25,7 @@ use vars qw( @exclude_extensions_dynamic @exclude_extensions_static $default_typ # Files whose filename extension is in the following list # will be ignored in static rendering -@exclude_extensions_static = qw(txt txt_) unless scalar(@exclude_extensions_dynamic); +@exclude_extensions_static = qw(txt txt_) unless scalar(@exclude_extensions_static); # This is the MIME type that will be used if nothing else # can be found. If your server contains mostly text or HTML @@ -99,7 +99,7 @@ sub end { && (-d $File::Find::name) ) { mkpath ("$blosxom::static_dir$1$2$3");} # is it a file to be updated ? - elsif ( ! grep(/$3/, @exclude_extensions_static) ) { + elsif ( ! grep(/^$3$/, @exclude_extensions_static) ) { my @static = stat( "$blosxom::static_dir$1$2$3" ); my @data = stat( $File::Find::name ); ( ( ! -e "$blosxom::static_dir$1$2$3" ) || -- 2.30.2