Fix bug in http-request in http-client library

cvs
Chris Double 2005-08-12 00:28:32 +00:00
parent 24ea7fab8d
commit 9707d90970
1 changed files with 1 additions and 1 deletions

View File

@ -24,7 +24,7 @@ io strings unparser ;
flush readln parse-response read-header ; flush readln parse-response read-header ;
: http-request ( host resource method -- ) : http-request ( host resource method -- )
write CHAR: \s write write " HTTP/1.0" write crlf write " " write write " HTTP/1.0" write crlf
"Host: " write write crlf ; "Host: " write write crlf ;
: get-request ( host resource -- ) : get-request ( host resource -- )