[category-barchart] remove datelist->stringlist

pull/428/head
Christopher Lam 8 years ago
parent de343aac3d
commit af5fb0dde5

@ -327,9 +327,6 @@ developing over time"))
(other-anchor "")
(all-data '()))
(define (datelist->stringlist dates-list)
(map qof-print-date dates-list))
;; Converts a commodity-collector into gnc-monetary in the report's
;; currency using the exchange-fn calculated above. Returns a gnc-monetary
;; multiplied by the averaging-multiplier (smaller than one; multiplication
@ -554,9 +551,9 @@ developing over time"))
(let ((dates-list (if do-intervals?
(list-head dates-list (1- (length dates-list)))
dates-list)))
(set! date-string-list (datelist->stringlist dates-list))
(set! date-string-list (map qof-print-date dates-list))
(qof-date-format-set QOF-DATE-FORMAT-ISO)
(set! date-iso-string-list (datelist->stringlist dates-list))
(set! date-iso-string-list (map qof-print-date dates-list))
(qof-date-format-set save-fmt)
;; Set chart title, subtitle etc.
(if (eq? chart-type 'barchart)

Loading…
Cancel
Save