[Bast-commits] r9421 - DBIx-Class/0.08/trunk/t/lib/DBICTest

[ribasushi at dev.catalyst.perl.org]

Author: ribasushi
Date: 2010-05-25 10:14:28 +0100 (Tue, 25 May 2010)
New Revision: 9421

Modified:
   DBIx-Class/0.08/trunk/t/lib/DBICTest/AuthorCheck.pm
Log:
Fix undef warning

Modified: DBIx-Class/0.08/trunk/t/lib/DBICTest/AuthorCheck.pm
===================================================================
--- DBIx-Class/0.08/trunk/t/lib/DBICTest/AuthorCheck.pm	2010-05-24 15:31:31 UTC (rev 9420)
+++ DBIx-Class/0.08/trunk/t/lib/DBICTest/AuthorCheck.pm	2010-05-25 09:14:28 UTC (rev 9421)
@@ -43,17 +43,18 @@
     push @fail_reasons, "Missing ./inc directory";
   }
 
-  if (not $mf_mtime) {
+  if(not $mf_mtime) {
     push @fail_reasons, "Missing ./Makefile";
   }
-  elsif($mf_mtime < $mf_pl_mtime) {
-    push @fail_reasons, "./Makefile.PL is newer than ./Makefile";
+  else {
+    if($mf_mtime < $mf_pl_mtime) {
+      push @fail_reasons, "./Makefile.PL is newer than ./Makefile";
+    }
+    if($mf_mtime < $optdeps_mtime) {
+      push @fail_reasons, "./$optdeps is newer than ./Makefile";
+    }
   }
 
-  if ($mf_mtime < $optdeps_mtime) {
-    push @fail_reasons, "./$optdeps is newer than ./Makefile";
-  }
-
   if (@fail_reasons) {
     print STDERR <<'EOE';