Subject: | Fwd: Minor fix to Finance::Bank::Bankwest |
Date: | Tue, 11 Mar 2014 13:35:02 +1100 |
To: | bug-finance-bank-bankwest [...] rt.cpan.org |
From: | Owen Hollands <owenhollands [...] gmail.com> |
Show quoted text
---------- Forwarded message ----------
From: Owen Hollands <owenhollands@gmail.com>
Date: Thu, Mar 6, 2014 at 12:43 PM
Subject: Minor fix to Finance::Bank::Bankwest
To: bug-financebank-bankwest@rt.cpan.org
In short, the "type" field of a transaction ins blank (undef) for credit
card "Authorisation Only" transaction. In Transaction.pm I ahve added
"Maybe" to the type check
--- ./Transaction.pm 2013-08-08 11:25:25.000000000 +1000
+++ /Users/owenhollands/perl5/lib/perl5/Finance/Bank/Bankwest/Transaction.pm
2014-03-05
10:11:41.000000000 +1100
@@ -16,7 +16,7 @@
[ narrative => 'Str' ],
[ cheque_num => 'Maybe[Str]' ],
[ amount => 'Maybe[Num]' ],
- [ type => 'Str' ],
+ [ type => 'Maybe[Str]' ],
) {
my ($attr, $type) = @$_;
has $attr => ( isa => $type, is => 'ro', required => 1 );