Watch out for a null account in render-corresponding-account-subheading, it

happened to me once.

git-svn-id: svn+ssh://svn.gnucash.org/repo/gnucash/trunk@18517 57a11ea4-9604-0410-9ed3-97b8803252fd
This commit is contained in:
Mike Alexander 2009-12-17 07:35:42 +00:00
parent b5aff667de
commit 2183451889

View File

@ -171,7 +171,9 @@
(let ((account (xaccSplitGetAccount (xaccSplitGetOtherSplit split))))
(add-subheading-row (gnc:make-html-text
(gnc:html-markup-anchor
(if (not (null? account))
(gnc:account-anchor-text account)
"")
(account-namestring account
(used-sort-account-code column-vector)
#t