fix printing of $@, which is clobbered by the call to gettext

problem reported by viric
master
Joey Hess 2010-03-28 17:17:07 -04:00
parent e1eee27fc5
commit 0d07bca315
1 changed files with 2 additions and 1 deletions

View File

@ -124,9 +124,10 @@ sub import (@) {
IkiWiki::run_hooks(checkconfig => sub { shift->() });
};
if ($@) {
my $err=$@;
print STDERR sprintf(gettext("** Disabling plugin %s, since it is failing with this message:"),
$plugin)."\n";
print STDERR "$@\n";
print STDERR "$err\n";
push @{$bakconfig{disable_plugins}}, $plugin;
}
}