X-Git-Url: https://git.dogcows.com/gitweb?p=chaz%2Fhomebank2ledger;a=blobdiff_plain;f=lib%2FFile%2FHomeBank.pm;h=0034ac831edd49ecb4b7cfab9b3519e4bbe367ad;hp=c786fddcf419a607d8c07f0f3eb78280a51bd93a;hb=1290bb7c0ee4c8fa6f962712b43207a0323b18a1;hpb=4ea7ddc5c5393a9e6493dee172c5e3ae8a0f89c9 diff --git a/lib/File/HomeBank.pm b/lib/File/HomeBank.pm index c786fdd..0034ac8 100644 --- a/lib/File/HomeBank.pm +++ b/lib/File/HomeBank.pm @@ -575,6 +575,10 @@ sub parse_string { $attr{flags}{$name} = $flags & (1 << $shift) ? 1 : 0; } + for my $bnum (0 .. 12) { + $attr{budget_amounts}[$bnum] = delete $attr{"b$bnum"} if $attr{"b$bnum"}; + } + push @categories, \%attr; } elsif ($node eq 'ope') { # transaction