syndicate-lang
/
racketmq-2017
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

Cope with renamed resource-path function

This commit is contained in:
Tony Garnock-Jones 2016-11-26 09:54:40 +13:00
parent 479faca644
commit df6bd3eb2a
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
racketmq/private/util.rkt
View File

@ -147,4 +147,4 @@
(define (canonical-url baseurl path)
(define b (url->resource (string->url baseurl)))
(url->string (resource->url (struct-copy web-resource b
[path (append-url-path (web-resource-path b) path)]))))
[path (append-resource-path (web-resource-path b) path)]))))