projects
/
Business-BatchPayment.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
history
|
raw
|
HEAD
0.03
[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;