X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=catagits%2FCatalyst-Runtime.git;a=blobdiff_plain;f=t%2Flib%2FTestLogger.pm;h=87e9213c56a2f33399eb699f19e43a5d71eaa643;hp=f1dc7e613f676992ce5b505dd297f26da128d8ad;hb=88e5a8b0c4d28e46b8ba6b6b9567063e57af9063;hpb=550464108eada19dba470ec5d17fc849399fdab0 diff --git a/t/lib/TestLogger.pm b/t/lib/TestLogger.pm index f1dc7e6..87e9213 100644 --- a/t/lib/TestLogger.pm +++ b/t/lib/TestLogger.pm @@ -3,6 +3,7 @@ use strict; use warnings; our @LOGS; +our @ILOGS; our @ELOGS; sub new { @@ -14,10 +15,16 @@ sub debug { push(@LOGS, shift()); } +sub info { + shift; + push(@ILOGS, shift()); +} + sub warn { shift; push(@ELOGS, shift()); } +sub error { die "Got unexpected error; $_[1]" } 1;