diff options
| -rwxr-xr-x | ebus-racket/inserter.rkt | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/ebus-racket/inserter.rkt b/ebus-racket/inserter.rkt index 7adbe88..90e0855 100755 --- a/ebus-racket/inserter.rkt +++ b/ebus-racket/inserter.rkt @@ -29,7 +29,7 @@ (let () (define url (format "~a/~a" (baseurl?) sensor-name)) (define raw-value - (cond ((member datatype '(data1c data2b data2c)) (real->decimal-string value)) + (cond ((member datatype '(data1c data2b data2c)) (real->decimal-string (exact->inexact value))) ((member datatype '(bit byte data1b word bcd)) (format "~s" value)) ((member datatype '(byteEnum)) value) (else (error 'invalid-datatype)))) |