raco pkg: add a missing `close-input-port' on network connection
This commit is contained in:
parent
10e2db7025
commit
3d91b6b77f
|
@ -38,7 +38,9 @@
|
|||
#:redirections 25
|
||||
#:status? #t))
|
||||
(and (string=? "200" (substring hs 9 12))
|
||||
(fun ip)))
|
||||
(begin0
|
||||
(fun ip)
|
||||
(close-input-port ip))))
|
||||
|
||||
(define (url-path/no-slash url)
|
||||
(define p (url-path url))
|
||||
|
|
Loading…
Reference in New Issue
Block a user