Re: virtual host support

2003-03-10 Thread Jose Roberto B. de A. Monteiro 

Kevin Ryde wrote:
 Jose Roberto B. de A. Monteiro [EMAIL PROTECTED] writes:
 
  -   (request (format #f ~A ~A ~A method path http:version))
  +   (request (format #f ~A ~A ~A\r\nHost: ~A method path http:version 
 (url:host url)))

 Perhaps the url:port should be included there too, at least if it's
 not 80.

url:port is used in tcp-port variable, which is an arg to http:open:

(define-public (http:request method url . args)
  (let ...
(tcp-port (or (url:port url) 80))
   ...
(let ((sock (http:open host tcp-port))
   ...

The port was sent to make the connection, then it makes the request GET 

Thanks...




___
Bug-guile mailing list
[EMAIL PROTECTED]
http://mail.gnu.org/mailman/listinfo/bug-guile

Re: virtual host support

2003-02-28 Thread Kevin Ryde 
Jose Roberto B. de A. Monteiro [EMAIL PROTECTED] writes:

 -   (request (format #f ~A ~A ~A method path http:version))
 +   (request (format #f ~A ~A ~A\r\nHost: ~A method path http:version 
 (url:host url)))

Perhaps the url:port should be included there too, at least if it's
not 80.


___
Bug-guile mailing list
[EMAIL PROTECTED]
http://mail.gnu.org/mailman/listinfo/bug-guile

Re: virtual host support

2003-02-27 Thread Thien-Thi Nguyen 
   From: Jose Roberto B. de A. Monteiro [EMAIL PROTECTED]
   Date: Thu, 27 Feb 2003 13:50:39 -0300

   In guile-www package: in http:request procedure, I am sending a patch
   to support virtual hosts retrieving.

thanks for the patch.  currently low-bandwidth, will probably take a
look at it in a week or so, after having completed a (residential) move.

thi


___
Bug-guile mailing list
[EMAIL PROTECTED]
http://mail.gnu.org/mailman/listinfo/bug-guile