IntenseFinance/gnucash
3
0
Fork 0
mirror of https://github.com/Gnucash/gnucash.git synced 2024-11-25 18:30:23 -06:00
Code Issues Packages Projects Releases Wiki Activity

Bug #528835: Harden gnc:txf-get-code-info when tax lookups fail.

Browse Source 
BP


git-svn-id: svn+ssh://svn.gnucash.org/repo/gnucash/trunk@17152 57a11ea4-9604-0410-9ed3-97b8803252fd
This commit is contained in:
Andreas Köhler 2008-05-11 21:41:01 +00:00
parent 70efd54257
commit 37300535b6
2 changed files with 6 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
src/tax/us/txf-de_DE.scm
View File

@ -39,7 +39,9 @@
;;;; Private
(define (gnc:txf-get-code-info categories code index)
(vector-ref (cdr (assv code categories)) index))
(let ((category (assv code categories)))
(and category
(vector-ref (cdr category) index))))
(define txf-help-categories
(list

4
src/tax/us/txf.scm
View File

@ -30,7 +30,9 @@
;;;; Private
(define (gnc:txf-get-code-info categories code index)
(vector-ref (cdr (assv code categories)) index))
(let ((category (assv code categories)))
(and category
(vector-ref (cdr category) index))))
(define txf-help-categories
(list