X-Git-Url: https://git.stderr.nl/gitweb?p=matthijs%2Fupstream%2Fblosxom-plugins.git;a=blobdiff_plain;f=barijaona%2Fstatic_file;h=6f75b1def7c400a3b2c9092ef84c27c1bc544dcb;hp=26fde1a59526f488f86a042c309620ea548039c1;hb=HEAD;hpb=9a82075365b0b0b36d72316101b12f14688d710d diff --git a/barijaona/static_file b/barijaona/static_file index 26fde1a..6f75b1d 100644 --- a/barijaona/static_file +++ b/barijaona/static_file @@ -1,7 +1,7 @@ # Blosxom Plugin: static_file # Author(s): Barijaona Ramaholimihaso # original idea by Raffi Krikorian (binary plugin) -# Version: 2007-09-08 +# Version: 2007-09-09 # Documentation: See the bottom of this file or type: perldoc static_file package static_file; @@ -21,11 +21,11 @@ use vars qw( @exclude_extensions_dynamic @exclude_extensions_static $default_typ # for instance the files Blosxom renders, generally .txt files. # Files whose filename extension is in the following list # will be ignored in dynamic rendering -@exclude_extensions_dynamic = qw( ) unless scalar(@exclude_extensions_dynamic); +@exclude_extensions_dynamic = qw(txt_ ) unless scalar(@exclude_extensions_dynamic); # Files whose filename extension is in the following list # will be ignored in static rendering -@exclude_extensions_static = qw("$blosxom::file_extension" 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 @@ -38,7 +38,7 @@ $default_type="text/plain" unless defined $default_type; # -------------------------------- sub start { - return 1; + return 1; } sub skip { @@ -53,7 +53,7 @@ sub skip { # 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 ;} + 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 = @@ -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" ) || @@ -137,13 +137,16 @@ Another convinience of this is that when you wish to include an image or anythin =head1 VERSION -2007-08-09 +2007-09-09 Version number is the date on which this version of the plug-in was created. =head2 CHANGES -2007-08-09 : +2007-09-09 : +- Bugfix : change how we check if we should serve the required extension (checks the complete extension, forgot that qw does not interpolate) + +2007-09-08 : - replaced File::Cat with a routine submitted by stephen2eq ; - checks the presence of the file directly in %blosxom::files and %blosxom::others - use strict ; programming style more compliant with some evolution ideas for blosxom @@ -153,15 +156,15 @@ Version number is the date on which this version of the plug-in was created. =head1 AUTHOR -Barijaona Ramaholimihaso +Barijaona Ramaholimihaso Original idea by Raffi Krikorian , http://www.bitwaste.com/, author of the binary plugin. =head1 SEE ALSO -Blosxom Home/Docs/Licensing: http://www.raelity.org/apps/blosxom/ +Blosxom Home/Docs/Licensing: http://blosxom.sourceforge.net -Blosxom Plugin Docs: http://www.raelity.org/apps/blosxom/plugin.shtml +Blosxom Plugin Docs: http://blosxom.sourceforge.net/plugins/ =head1 NOTES @@ -169,6 +172,10 @@ If you are using this plugin in Blosxom's dynamic mode, you might consider creat It is recommanded, for performance optimization, to put a number in front of the name of this plugin, for instance to name it B<00static_file>, so that it loads among the first. +=head1 BUGS + +None known; please send bug reports and feedback to the Blosxom development mailing list . + =head1 LICENSE static_file Blosxom plugin