X-Git-Url: http://git.vanrenterghem.biz/git.ikiwiki.info.git/blobdiff_plain/ffc0be87d7eca4de4dbc91d740d36b7b40bfa911..0a26c630eb9fa8eb4a7cc07f3b3381f5664e1321:/IkiWiki/Setup.pm diff --git a/IkiWiki/Setup.pm b/IkiWiki/Setup.pm index 40ed78862..235e93eaf 100644 --- a/IkiWiki/Setup.pm +++ b/IkiWiki/Setup.pm @@ -2,13 +2,17 @@ use warnings; use strict; +use IkiWiki; +use open qw{:utf8 :std}; package IkiWiki; sub setup () { # {{{ my $setup=possibly_foolish_untaint($config{setup}); delete $config{setup}; - open (IN, $setup) || error("read $setup: $!\n"); + #translators: The first parameter is a filename, and the second + #translators: is a (probably not translated) error message. + open (IN, $setup) || error(sprintf(gettext("cannot read %s: %s"), $setup, $!)); my $code; { local $/=undef; @@ -18,7 +22,7 @@ sub setup () { # {{{ close IN; eval $code; - error($@) if $@; + error("$setup: ".$@) if $@; exit; } #}}}