Add exact->inexact in plots for Guile 1.8 to print parsable doubles.

git-svn-id: svn+ssh://svn.gnucash.org/repo/gnucash/trunk@16152 57a11ea4-9604-0410-9ed3-97b8803252fd
This commit is contained in:
Andreas Köhler 2007-06-03 20:56:52 +00:00
parent d4439dc3e4
commit b253df6c8a
3 changed files with 3 additions and 3 deletions

View File

@ -266,7 +266,7 @@
(define (gnc:html-barchart-render barchart doc)
(define (ensure-numeric elt)
(cond ((number? elt)
elt)
(exact->inexact elt))
((string? elt)
(with-input-from-string elt
(lambda ()

View File

@ -136,7 +136,7 @@
(map
(lambda (elt)
(cond ((number? elt)
(abs elt))
(exact->inexact (abs elt)))
((string? elt)
(with-input-from-string elt
(lambda ()

View File

@ -127,7 +127,7 @@
(define (gnc:html-scatter-render scatter doc)
(define (ensure-numeric elt)
(cond ((number? elt)
elt)
(exact->inexact elt))
((string? elt)
(with-input-from-string elt
(lambda ()