IntenseFinance/gnucash
3
0
Fork 0
mirror of https://github.com/Gnucash/gnucash.git synced 2025-02-20 11:48:30 -06:00
Code Issues Packages Projects Releases Wiki Activity

Null-value protection for GUID and account values.

Browse Source
This commit is contained in:
John Ralls 2021-08-17 15:34:45 -07:00
parent 53fac914c0
commit c06924622c
1 changed files with 4 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
gnucash/report/html-utilities.scm
View File

@ -79,10 +79,12 @@
(list)))
(define (gnc:register-guid type guid)
(gnc-build-url URL-TYPE-REGISTER (string-append type guid) ""))
(and guid (gnc-build-url URL-TYPE-REGISTER (string-append type guid) "")))
(define (gnc:account-anchor-text acct)
(gnc:register-guid "acct-guid=" (gncAccountGetGUID acct)))
(if acct
(gnc:register-guid "acct-guid=" (gncAccountGetGUID acct))
(format #t "No Account!")))
(define (gnc:split-anchor-text split)
(gnc:register-guid "split-guid=" (gncSplitGetGUID split)))