projects
/
catagits/Catalyst-Runtime.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
blame
|
history
|
raw
|
HEAD
Merge branch 'patch-1' of https://github.com/maqnouch/catalyst-runtime into maqnouch...
[catagits/Catalyst-Runtime.git]
/
t
/
lib
/
TestLogger.pm
1
package TestLogger;
2
use strict;
3
use warnings;
4
5
our @LOGS;
6
our @ILOGS;
7
our @ELOGS;
8
9
sub new {
10
return bless {}, __PACKAGE__;
11
}
12
13
sub debug {
14
shift;
15
push(@LOGS, shift());
16
}
17
18
sub info {
19
shift;
20
push(@ILOGS, shift());
21
}
22
23
sub warn {
24
shift;
25
push(@ELOGS, shift());
26
}
27
28
sub error { die "Got unexpected error; $_[1]" }
29
1;
30