projects
/
Business-BatchPayment.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
1d8c332e1a0735ee35128a2d54ca195c0f200f56
[Business-BatchPayment.git]
/
BatchPayment
/
Debug.pm
1
package Business::BatchPayment::Debug;
2
3
=head1 DESCRIPTION
4
5
The 'debug' attribute. All Business::BatchPayment classes should support
6
this. $Business::BatchPayment::DEBUG can be set to turn on debugging
7
globally.
8
9
=cut
10
11
use strict;
12
use Moose::Role;
13
14
has 'debug' => (
15
is => 'rw',
16
isa => 'Int',
17
default => sub { $Business::BatchPayment::DEBUG || 0 },
18
lazy => 1,
19
);
20
21
1;