scsh-conservatory
/
sunet
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

rename URI-STRING->HTTP-URL to URL-STRING->HTTP-URL

This commit is contained in:
vibr 2005-04-06 11:35:37 +00:00
parent 5836ae567b
commit 17a46a7e71
3 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
scheme/httpd/core.scm
View File

@ -252,7 +252,7 @@
(else (fatal-syntax-error "Bad Request Line."))))
(meth (car elts))
(request-uri (cadr elts))
(url (uri-string->http-url request-uri))
(url (url-string->http-url request-uri))
(headers (if (equal? version '(0 . 9))
'()
(read-rfc822-headers (socket:inport sock)))))

2
scheme/lib/url.scm
View File

@ -240,7 +240,7 @@
;;; parse a HTTP 1.1. Request_URI into a http-url record
(define (uri-string->http-url uri-string)
(define (url-string->http-url uri-string)
(call-with-values
(lambda () (parse-url uri-string))
parsed-uri->http-url))

2
scheme/packages.scm
View File

@ -64,7 +64,7 @@
http-url-path
http-url-query
uri-string->http-url
url-string->http-url
http-url->url-string
http-url-path->path-string))