From bd7537b677d46f70a2446fcc00d9834d19a68b6b Mon Sep 17 00:00:00 2001 From: Daniel Friesel Date: Sat, 26 Feb 2011 10:26:52 +0100 Subject: WWW::Efa: Also allow dd.mm dates, for those really lazy people --- lib/WWW/Efa.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lib/WWW/Efa.pm b/lib/WWW/Efa.pm index b59bf53..b98a021 100644 --- a/lib/WWW/Efa.pm +++ b/lib/WWW/Efa.pm @@ -79,7 +79,7 @@ sub post_time { sub post_date { my ($post, $date) = @_; - if ($date !~ /^ [0-3]? \d \. [01]? \d \. (?: \d{4} )? $/x) { + if ($date !~ /^ [0-3]? \d \. [01]? \d (?: | \. | \. (?: \d{4} ))? $/x) { die WWW::Efa::Error::Setup->new( 'date', $date, 'Must match DD.MM.[YYYY]' ); -- cgit v1.2.3