summaryrefslogtreecommitdiff
path: root/lib/WWW/Efa.pm
diff options
context:
space:
mode:
authorDaniel Friesel <derf@finalrewind.org>2011-02-26 10:26:52 +0100
committerDaniel Friesel <derf@finalrewind.org>2011-02-26 10:26:52 +0100
commitbd7537b677d46f70a2446fcc00d9834d19a68b6b (patch)
treeb5472d3d2c18493b5b2ba7c39f5db8c5202c0ba4 /lib/WWW/Efa.pm
parent3557cfb0c021747caf5a5d2cbb192ac60c0c97bd (diff)
WWW::Efa: Also allow dd.mm dates, for those really lazy people
Diffstat (limited to 'lib/WWW/Efa.pm')
-rw-r--r--lib/WWW/Efa.pm2
1 files changed, 1 insertions, 1 deletions
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]'
);