do not die if middleware has no VERSION
John Napiorkowski [Wed, 31 Jul 2013 21:04:33 +0000 (17:04 -0400)]
lib/Catalyst.pm

index 5b2472a..c9650a9 100644 (file)
@@ -1151,8 +1151,11 @@ EOF
             $class->log->debug( "Loaded plugins:\n" . $t->draw . "\n" );
         }
 
-        my @middleware = map { ref $_ eq 'CODE' ? "Inline Coderef" : (ref($_) .'  '. $_->VERSION || '')  }
-          $class->registered_middlewares;
+        my @middleware = map {
+          ref $_ eq 'CODE' ? 
+            "Inline Coderef" : 
+              (ref($_) .'  '. ($_->can('VERSION') ? $_->VERSION : '') 
+                || '')  } $class->registered_middlewares;
 
         if (@middleware) {
             my $column_width = Catalyst::Utils::term_width() - 6;