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->() }); IkiWiki::run_hooks(checkconfig => sub { shift->() });
}; };
if ($@) { if ($@) {
my $err=$@;
print STDERR sprintf(gettext("** Disabling plugin %s, since it is failing with this message:"), print STDERR sprintf(gettext("** Disabling plugin %s, since it is failing with this message:"),
$plugin)."\n"; $plugin)."\n";
print STDERR "$@\n"; print STDERR "$err\n";
push @{$bakconfig{disable_plugins}}, $plugin; push @{$bakconfig{disable_plugins}}, $plugin;
} }
} }