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

gnc:job-get-owner is gncJobGetOwner now. Fixes #410407.

Browse Source 
git-svn-id: svn+ssh://svn.gnucash.org/repo/gnucash/trunk@15640 57a11ea4-9604-0410-9ed3-97b8803252fd
This commit is contained in:
Andreas Köhler 2007-02-21 18:46:44 +00:00
parent 88456c2b3c
commit 2adda37f7e
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
src/business/business-core/business-core.scm
View File

@ -16,7 +16,7 @@
(let ((e (gncOwnerGetEmployee owner)))
(gncEmployeeGetAddr e)))
((eqv? type GNC-OWNER-JOB)
(gnc:owner-get-address (gnc:job-get-owner
(gnc:owner-get-address (gncJobGetOwner
(gncOwnerGetJob owner))))
(else '()))))
@ -38,7 +38,7 @@
(let ((type (gncOwnerGetType owner)))
(cond
((eqv? type GNC-OWNER-JOB)
(gnc:owner-get-name-dep (gnc:job-get-owner
(gnc:owner-get-name-dep (gncJobGetOwner
(gncOwnerGetJob owner))))
(else (just-name (gncOwnerGetName owner))))))