first round of Perl::Critic cleanups. Do not use return undef, use a bare return instead

2007-12-05 00:30:43 +00:00 · 2007-12-05 00:30:43 +00:00 · 96178fd70c
commit 96178fd70c
parent 75041656ee
92 changed files with 209 additions and 209 deletions
--- a/lib/WebGUI/Form/DateTime.pm
+++ b/lib/WebGUI/Form/DateTime.pm
@ -131,7 +131,7 @@ sub getValueFromPost {
 		$self->session->errorHandler->warn("Date value: $value");
 		
 		# Verify format
-		return undef
+		return
 			unless ($value =~ m/(?:\d{2}|\d{4})\D\d{2}\D\d{2}\D\d{2}\D\d{2}\D\d{2}/);
 		
 		# Fix time zone