[Bese-devel] Using araneida

Marco Baringer mb at bese.it
Fri May 6 15:34:27 UTC 2005


Brian Downing <bdowning at lavos.net> writes:

> On Sun, May 01, 2005 at 11:32:50AM -0500, Brian Downing wrote:
>> --- orig/src/backend/araneida.lisp
>> +++ mod/src/backend/araneida.lisp
>> @@ -152,7 +152,7 @@
>>    (let (content-type content-length expires cache-control location refresh
>>         pragma set-cookie conditional www-authenticate last-modified extra-headers)
>>    (dolist* (header-cons (headers r))
>> -    (case (car header-cons)
>> +    (case (intern (car header-cons) "KEYWORD")
>>        (:content-type     (setf content-type     (cdr header-cons)))
>>        (:content-length   (setf content-length   (cdr header-cons)))
>>        (:expires          (setf expires          (cdr header-cons)))
>
> This won't work, of course - I don't know what I was thinking.

I just applied what I believe to be a "proper" fix to this (ucw
doesn't try to use keywords for header names anymore so i was able to
delete some code while i was in that file): ucw--dev--0.3--patch-410.
can you try it and tell me what you think?

p.s. - the log and the diffs for that patch can be viewed at:

http://common-lisp.net/cgi-bin/archzoom.cgi/ucw-2004@common-lisp.net/ucw--dev--0.3--patch-410?log

-- 
-Marco
Ring the bells that still can ring.
Forget the perfect offering.
There is a crack in everything.
That's how the light gets in.
	-Leonard Cohen



More information about the bese-devel mailing list