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

Fix some of the query creation code so as not to match all splits

Browse Source 
in the book.  This is to help fix bugID 8805, but it sounds like it
is not completely fixed, yet.


git-svn-id: svn+ssh://svn.gnucash.org/repo/gnucash/trunk@7120 57a11ea4-9604-0410-9ed3-97b8803252fd
This commit is contained in:
Derek Atkins 2002-07-17 23:48:19 +00:00
parent b553819fba
commit d9acfb3341
1 changed files with 1 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
src/import-export/qif-import/qif-merge-groups.scm
View File

@ -16,7 +16,7 @@
;; account group. ;; account group.
(gnc:query-add-account-match query (gnc:query-add-account-match query
(gnc:group-get-subaccounts group) (gnc:group-get-subaccounts group)
'guid-match-any 'query-or) 'guid-match-any 'query-and)
(set! xtns (gnc:query-get-transactions query 'query-txn-match-all)) (set! xtns (gnc:query-get-transactions query 'query-txn-match-all))
@ -55,7 +55,6 @@
;; for each split in the transaction, add a term to match the ;; for each split in the transaction, add a term to match the
;; properties of one split ;; properties of one split
(let ((q-splits (gnc:malloc-query))) (let ((q-splits (gnc:malloc-query)))
(gnc:query-set-book q-splits (gnc:group-get-book old-group))
(for-each (for-each
(lambda (split) (lambda (split)
(let ((sq (gnc:malloc-query))) (let ((sq (gnc:malloc-query)))