X-Git-Url: https://git.dogcows.com/gitweb?a=blobdiff_plain;ds=sidebyside;f=lib%2FFile%2FHomeBank.pm;h=0034ac831edd49ecb4b7cfab9b3519e4bbe367ad;hb=1290bb7c0ee4c8fa6f962712b43207a0323b18a1;hp=c786fddcf419a607d8c07f0f3eb78280a51bd93a;hpb=b4cac7fd661b6d2a385e89399854dde984d594fe;p=chaz%2Fhomebank2ledger 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