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/Plugin/inline.pm | |
parent | dd2ce6e6a064b804902369c74f8a654755ea3de2 (diff) |
* Make sure to check for errors from every eval.
Diffstat (limited to 'IkiWiki/Plugin/inline.pm')
-rw-r--r-- | IkiWiki/Plugin/inline.pm | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/IkiWiki/Plugin/inline.pm b/IkiWiki/Plugin/inline.pm index ad8b718f3..c6c6c6a1e 100644 --- a/IkiWiki/Plugin/inline.pm +++ b/IkiWiki/Plugin/inline.pm @@ -211,6 +211,7 @@ sub date_822 ($) { #{{{ my $time=shift; eval q{use POSIX}; + error($@) if $@; my $lc_time= POSIX::setlocale(&POSIX::LC_TIME); POSIX::setlocale(&POSIX::LC_TIME, "C"); my $ret=POSIX::strftime("%a, %d %b %Y %H:%M:%S %z", localtime($time)); @@ -222,6 +223,7 @@ sub date_3339 ($) { #{{{ my $time=shift; eval q{use POSIX}; + error($@) if $@; my $lc_time= POSIX::setlocale(&POSIX::LC_TIME); POSIX::setlocale(&POSIX::LC_TIME, "C"); my $ret=POSIX::strftime("%Y-%m-%dT%H:%M:%SZ", localtime($time)); |