diff --git a/ChangeLog b/ChangeLog index 718a897ce0..c5eed3d2b4 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,3 +1,8 @@ +2002-07-09 Derek Atkins + + * "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 * kvp-option-registry.scm: create a registry of kvp-options diff --git a/src/import-export/qif-import/qif-dialog-utils.scm b/src/import-export/qif-import/qif-dialog-utils.scm index 745b41788f..f6a957bafc 100644 --- a/src/import-export/qif-import/qif-dialog-utils.scm +++ b/src/import-export/qif-import/qif-dialog-utils.scm @@ -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) diff --git a/src/report/standard-reports/average-balance.scm b/src/report/standard-reports/average-balance.scm index 7acefddcd2..7f4d303e85 100644 --- a/src/report/standard-reports/average-balance.scm +++ b/src/report/standard-reports/average-balance.scm @@ -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)