about summary refs log tree commit diff
diff options
context:
space:
mode:
-rw-r--r--rent.scm6
1 files changed, 5 insertions, 1 deletions
diff --git a/rent.scm b/rent.scm
index 1effb3e..7ae101d 100644
--- a/rent.scm
+++ b/rent.scm
@@ -352,7 +352,11 @@ and not distance as the crow flies."
       #(point-b-latitude point-b-longitude))
      (call-with-port (open-bytevector-input-port
                       (http-get*
-                       (format #f "~a/table/v1/bike/~a,~a;~a,~a?annotations=distance&sources=0&destinations=1"
+                       ;; We use ~f for latitude/longitude since ~a
+                       ;; would use the exponential float notation for
+                       ;; small numbers and the API does not like
+                       ;; that.
+                       (format #f "~a/table/v1/bike/~f,~f;~f,~f?annotations=distance&sources=0&destinations=1"
                                %osrm-base-url
                                point-a-longitude point-a-latitude
                                point-b-longitude point-b-latitude)))