disable warnings when evaling setup files

In particular, perl warns if a qw{} contains a #, but openids can.

If the setup file has 'use warnings', it will turn warning messages back
on, so it seems reasonable to squelch them by default.
master
Joey Hess 2010-05-21 13:39:07 -04:00
parent 29cd4616fb
commit 6472302b8d
1 changed files with 1 additions and 0 deletions

View File

@ -33,6 +33,7 @@ sub load ($;$) {
if ($1) {
error sprintf(gettext("cannot load %s in safe mode"), $file)
if $safemode;
no warnings;
eval IkiWiki::possibly_foolish_untaint($content);
error("$file: ".$@) if $@;
}