* src/report/standard-reports/transaction.scm (trep-renderer):

quit using gnc:glist->list and gnc:list->glist -- new g-wrap
eliminates need.


git-svn-id: svn+ssh://svn.gnucash.org/repo/gnucash/trunk@6605 57a11ea4-9604-0410-9ed3-97b8803252fd
This commit is contained in:
Rob Browning 2002-01-09 22:11:07 +00:00
parent 04fe739267
commit d89db5340a

View File

@ -1086,7 +1086,7 @@ Credit Card, and Income accounts")))))
(gnc:query-set-book query (gnc:get-current-book)) (gnc:query-set-book query (gnc:get-current-book))
;;(gnc:warn "query is:" query) ;;(gnc:warn "query is:" query)
(gnc:query-add-account-match query (gnc:query-add-account-match query
(gnc:list->glist c_account_1) c_account_1
'acct-match-any 'query-and) 'acct-match-any 'query-and)
(gnc:query-add-date-match-timepair (gnc:query-add-date-match-timepair
query #t begindate #t enddate 'query-and) query #t begindate #t enddate 'query-and)
@ -1106,8 +1106,8 @@ Credit Card, and Income accounts")))))
(gnc:query-set-match-voids-only! query (gnc:get-current-book))) (gnc:query-set-match-voids-only! query (gnc:get-current-book)))
(else #f)) (else #f))
(set! splits (gnc:glist->list (gnc:query-get-splits query) (set! splits (gnc:query-get-splits query))
<gnc:Split*>))
;;(gnc:warn "Splits in trep-renderer:" splits) ;;(gnc:warn "Splits in trep-renderer:" splits)
;;(gnc:warn "Filter account names:" (get-other-account-names c_account_2)) ;;(gnc:warn "Filter account names:" (get-other-account-names c_account_2))