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

[trep-engine] export gnc:lists->csv properly

Browse Source 
error 94c61e15f
This commit is contained in:
Christopher Lam 2020-08-16 22:42:35 +08:00
parent 79a273545c
commit f769999ffd
2 changed files with 3 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
gnucash/report/report.scm
View File

@ -735,6 +735,7 @@
;; trep-engine.scm ;; trep-engine.scm
(export gnc:trep-options-generator) (export gnc:trep-options-generator)
(export gnc:trep-renderer) (export gnc:trep-renderer)
(export gnc:lists->csv)
;; report-register-hooks.scm ;; report-register-hooks.scm

3
gnucash/report/trep-engine.scm
View File

@ -465,7 +465,6 @@ Credit Card, and Income accounts."))
(and (keylist-get-info (sortkey-list split-action?) sortkey 'split-sortvalue) (and (keylist-get-info (sortkey-list split-action?) sortkey 'split-sortvalue)
(not (keylist-get-info (sortkey-list split-action?) sortkey 'sortkey)))) (not (keylist-get-info (sortkey-list split-action?) sortkey 'sortkey))))
(define-public gnc:lists->csv lists->csv)
(define (lists->csv lst) (define (lists->csv lst)
;; converts a list of lists into CSV ;; converts a list of lists into CSV
;; this function aims to follow RFC4180, and will pad lists to ;; this function aims to follow RFC4180, and will pad lists to
@ -505,6 +504,8 @@ Credit Card, and Income accounts."))
(string-join (map strify lst) "\n")) (string-join (map strify lst) "\n"))
(define gnc:lists->csv lists->csv)
;; ;;
;; Default Transaction Report ;; Default Transaction Report