Silence another warning
Dave Rolsky [Mon, 12 Jan 2009 00:48:51 +0000 (00:48 +0000)]
t/100_bugs/020_super_recursion.t

index 92ec997..913765d 100644 (file)
@@ -35,7 +35,7 @@ use Test::More 'no_plan';
 
     sub bar {
         ::BAIL_OUT('B::bar called twice') if $main::seen{'B::bar'}++;
-        return 'b' . super();
+        return 'b' . ( super() || '' );
     }
 
     override baz => sub {