X-Git-Url: http://git.tremily.us/?p=ikiwiki.git;a=blobdiff_plain;f=ikiwiki;h=361c75c07c0547bb3f01de7f143b4861caa17f21;hp=de71414ede7e6a33d2d565bfaf0b31edebb589cc;hb=15d316a812d89abf49be1641b4a611200c49c762;hpb=1e5c7926cf8f54e25bb6c9c5f3b3be5e8667b47b diff --git a/ikiwiki b/ikiwiki index de71414ed..361c75c07 100755 --- a/ikiwiki +++ b/ikiwiki @@ -3,7 +3,6 @@ $ENV{PATH}="/usr/local/bin:/usr/bin:/bin"; use warnings; use strict; -use File::Find; use Memoize; use File::Spec; use HTML::Template; @@ -251,7 +250,9 @@ sub htmlize ($$) { #{{{ my $content=shift; if (! $INC{"/usr/bin/markdown"}) { + no warnings 'once'; $blosxom::version="is a proper perl module too much to ask?"; + use warnings 'all'; do "/usr/bin/markdown"; } @@ -535,11 +536,15 @@ sub refresh () { #{{{ # Find existing pages. my %exists; my @files; + + eval q{use File::Find}; find({ no_chdir => 1, wanted => sub { if (/$config{wiki_file_prune_regexp}/) { + no warnings 'once'; $File::Find::prune=1; + use warnings "all"; } elsif (! -d $_) { my ($f)=/$config{wiki_file_regexp}/; # untaint