1# test module used by t/core/debug.t
2
3package My::Debugger3;
4
5use Badger::Debug
6    default => 0;
7
8sub debug_static_status {
9    return DEBUG ? 'on' : 'off';
10}
11
12sub debug_dynamic_status {
13    return $DEBUG ? 'on' : 'off';
14}
15
16sub wibble {
17    my ($self, $value) = @_;
18    return DEBUG
19        ? 'debugging wibble'
20        : 'normal wibble';
21}
22
23sub wobble {
24    my ($self, $value) = @_;
25    return $DEBUG
26        ? 'debugging wobble'
27        : 'normal wobble';
28}
29
301;
31