* "global-replace for-each-in-order for-each" because the former

does not exist in current guiles.  Fixes bugID 87693


git-svn-id: svn+ssh://svn.gnucash.org/repo/gnucash/trunk@7104 57a11ea4-9604-0410-9ed3-97b8803252fd
This commit is contained in:
Derek Atkins 2002-07-09 19:53:35 +00:00
parent 55e46197eb
commit 3b49b42812
3 changed files with 7 additions and 2 deletions

View File

@ -1,3 +1,8 @@
2002-07-09 Derek Atkins <derek@ihftp.com>
* "global-replace for-each-in-order for-each" because the former
does not exist in current guiles. Fixes bugID 87693
2002-07-08 Derek Atkins <derek@ihtfp.com>
* kvp-option-registry.scm: create a registry of kvp-options

View File

@ -725,7 +725,7 @@
(define (qif-import:refresh-match-selection matches item)
(if (> item -1)
(let ((i 0))
(for-each-in-order
(for-each
(lambda (match)
(if (= i item)
(if (cdr match)

View File

@ -477,7 +477,7 @@
(let ((table (gnc:make-html-table)))
(gnc:html-table-set-col-headers!
table columns)
(for-each-in-order
(for-each
(lambda (row)
(gnc:html-table-append-row! table row))
data)