Revision: 3729 Author: edi URL: http://bknr.net/trac/changeset/3729

Fix generation of user-agent header

U trunk/thirdparty/drakma/CHANGELOG.txt U trunk/thirdparty/drakma/request.lisp

Modified: trunk/thirdparty/drakma/CHANGELOG.txt =================================================================== --- trunk/thirdparty/drakma/CHANGELOG.txt 2008-08-07 20:06:50 UTC (rev 3728) +++ trunk/thirdparty/drakma/CHANGELOG.txt 2008-08-19 11:49:23 UTC (rev 3729) @@ -1,4 +1,5 @@ Added *ALLOW-DOTLESS-COOKIE-DOMAINS-P* (thanks to Daniel Janus) +Fix generation of user agent header (bug caught by Chaitanya Gupta)

Version 0.11.5 2008-03-21

Modified: trunk/thirdparty/drakma/request.lisp =================================================================== --- trunk/thirdparty/drakma/request.lisp 2008-08-07 20:06:50 UTC (rev 3728) +++ trunk/thirdparty/drakma/request.lisp 2008-08-19 11:49:23 UTC (rev 3729) @@ -514,7 +514,7 @@ (string-upcase protocol)) (write-header "Host" "~A~@[:~A~]" (uri-host uri) (non-default-port uri)) (when user-agent - (write-header "User-Agent" (user-agent-string user-agent))) + (write-header "User-Agent" "~A" (user-agent-string user-agent))) (when basic-authorization (write-header "Authorization" "Basic ~A" (base64:string-to-base64-string