diff options
author | joey <joey@0fa5a96a-9a0e-0410-b3b2-a0fd24251071> | 2006-11-08 21:03:33 +0000 |
---|---|---|
committer | joey <joey@0fa5a96a-9a0e-0410-b3b2-a0fd24251071> | 2006-11-08 21:03:33 +0000 |
commit | 35ee7e44a62f9126a83c1243b549d47cc5ca7b43 (patch) | |
tree | ba5c6a377f586a8c7114fb4387b2386f06f5e1ee /IkiWiki.pm | |
parent | dd2ce6e6a064b804902369c74f8a654755ea3de2 (diff) |
* Make sure to check for errors from every eval.
Diffstat (limited to 'IkiWiki.pm')
-rw-r--r-- | IkiWiki.pm | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/IkiWiki.pm b/IkiWiki.pm index 73bc747f9..efacb20ed 100644 --- a/IkiWiki.pm +++ b/IkiWiki.pm @@ -76,12 +76,14 @@ sub checkconfig () { #{{{ } if (defined $config{locale}) { eval q{use POSIX}; + error($@) if $@; $ENV{LANG} = $config{locale} if POSIX::setlocale(&POSIX::LC_TIME, $config{locale}); } if ($config{w3mmode}) { eval q{use Cwd q{abs_path}}; + error($@) if $@; $config{srcdir}=possibly_foolish_untaint(abs_path($config{srcdir})); $config{destdir}=possibly_foolish_untaint(abs_path($config{destdir})); $config{cgiurl}="file:///\$LIB/ikiwiki-w3m.cgi/".$config{cgiurl} @@ -360,6 +362,7 @@ sub displaytime ($) { #{{{ my $time=shift; eval q{use POSIX}; + error($@) if $@; # strftime doesn't know about encodings, so make sure # its output is properly treated as utf8 return decode_utf8(POSIX::strftime( |