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

rename gnc:owner-get-address-dep to gnc:owner-get-name-and-address-dep

Browse Source 
in preparation of some other patches.



git-svn-id: svn+ssh://svn.gnucash.org/repo/gnucash/trunk@13232 57a11ea4-9604-0410-9ed3-97b8803252fd
This commit is contained in:
Derek Atkins 2006-02-12 15:28:58 +00:00
parent 4f50bbc80b
commit 6dacd59a05
6 changed files with 14 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
ChangeLog
View File

@ -1,3 +1,10 @@
2006-02-12 Derek Atkins <derek@ihtfp.com>
* src/business/*/*.scm:
rename gnc:owner-get-address-dep to
gnc:owner-get-name-and-address-dep in preparation of
some other patches.
2006-02-11 Derek Atkins <derek@ihtfp.com>
* src/report/report-gnome/gnc-plugin-page-report.c:

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

@ -53,7 +53,7 @@
(gnc:owner-get-job owner))))
(else ""))))
(define (gnc:owner-get-address-dep owner)
(define (gnc:owner-get-name-and-address-dep owner)
(let ((type (gw:enum-<gnc:GncOwnerType>-val->sym
(gnc:owner-get-type owner) #f)))
(case type
@ -73,7 +73,7 @@
""
(gnc:employee-get-addr e))))
((gnc-owner-job)
(gnc:owner-get-address-dep (gnc:job-get-owner
(gnc:owner-get-name-and-address-dep (gnc:job-get-owner
(gnc:owner-get-job owner))))
(else ""))))
@ -134,7 +134,7 @@
(export gnc:owner-get-address)
(export gnc:owner-get-address-dep)
(export gnc:owner-get-name-and-address-dep)
(export gnc:owner-get-owner-id)
(export gnc:entry-type-percent-p)
(export gnc:owner-from-split)

2
src/business/business-reports/easy-invoice.scm
View File

@ -584,7 +584,7 @@
(gnc:html-table-append-row!
table
(list
(string-expand (gnc:owner-get-address-dep owner) #\newline "<br>")))
(string-expand (gnc:owner-get-name-and-address-dep owner) #\newline "<br>")))
(gnc:html-table-append-row!
table
(list "<br>"))

2
src/business/business-reports/fancy-invoice.scm
View File

@ -576,7 +576,7 @@
(gnc:html-table-append-row!
table
(list
(string-expand (gnc:owner-get-address-dep owner) #\newline "<br>")))
(string-expand (gnc:owner-get-name-and-address-dep owner) #\newline "<br>")))
(gnc:html-table-append-row!
table
(list "<br>"))

2
src/business/business-reports/invoice.scm
View File

@ -549,7 +549,7 @@
(gnc:html-table-append-row!
table
(list
(string-expand (gnc:owner-get-address-dep owner) #\newline "<br>")))
(string-expand (gnc:owner-get-name-and-address-dep owner) #\newline "<br>")))
(gnc:html-table-append-row!
table
(list "<br>"))

2
src/business/business-reports/owner-report.scm
View File

@ -462,7 +462,7 @@
(gnc:html-table-append-row!
table
(list
(string-expand (gnc:owner-get-address-dep owner) #\newline "<br>")))
(string-expand (gnc:owner-get-name-and-address-dep owner) #\newline "<br>")))
(gnc:html-table-append-row!
table
(list "<br>"))