Commit d47e303f authored by Birte Kristina Friesel's avatar Birte Kristina Friesel
Browse files

efa: Fix opt_date

parent 8349779b
Loading
Loading
Loading
Loading
+1 −1
Original line number Diff line number Diff line
@@ -97,7 +97,7 @@ sub opt_time {
}

sub opt_date {
	my ($date) = @_;
	my (undef, $date) = @_;

	if ($date !~ /^ [0-3]? \d \. [01]? \d \. (?: \d{4} )? $/x) {
		die("Invalid argument: Usage: --date DD.MM.[YYYY]\n");