aboutsummaryrefslogtreecommitdiff
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)))