web.lsp 0.3

Featuring the Dragonfly web framework
Locked
Jeff
Posts: 604
Joined: Sat Apr 07, 2007 2:23 pm
Location: Ohio
Contact:

web.lsp 0.3

Post by Jeff »

Fixed (hopefully) a query parsing bug, made the query parser more tolerant, and added a parameter to cookie to limit cookies to secure (https) sessions.

Download: http://static.artfulcode.net/newlisp/web.lsp
Jeff
=====
Old programmers don't die. They just parse on...

Artful code

newdep
Posts: 2038
Joined: Mon Feb 23, 2004 7:40 pm
Location: Netherlands

Post by newdep »

Tight coding jeff! nice work..
-- (define? (Cornflakes))

m35
Posts: 171
Joined: Wed Feb 14, 2007 12:54 pm
Location: Carifornia

Post by m35 »

Hey Jeff, very nice, but should this be set?

Code: Select all

  (dolist (idx '($0 $1 $2 $3 $4 $5 $6 $7 $8 $9))
    (setf idx nil))
    ;   ^ set?

Jeff
Posts: 604
Joined: Sat Apr 07, 2007 2:23 pm
Location: Ohio
Contact:

Post by Jeff »

Why? In that instance, they are identical.
Jeff
=====
Old programmers don't die. They just parse on...

Artful code

Lutz
Posts: 5289
Joined: Thu Sep 26, 2002 4:45 pm
Location: Pasadena, California
Contact:

Post by Lutz »

m35 has a point ;-)

Code: Select all

> (dolist (idx '($0 $1 $2 $3)) (setf idx 123))
123
> $0
nil
> $1
nil
> (dolist (idx '($0 $1 $2 $3)) (set idx 123))
123
> $0
123
> $1
123
> 

Jeff
Posts: 604
Joined: Sat Apr 07, 2007 2:23 pm
Location: Ohio
Contact:

Post by Jeff »

I stand corrected. I'll upload a fixed version momentarily.
Jeff
=====
Old programmers don't die. They just parse on...

Artful code

cormullion
Posts: 2038
Joined: Tue Nov 29, 2005 8:28 pm
Location: latiitude 50N longitude 3W
Contact:

Post by cormullion »

It's working fine, thanks Jeff. I'm testing it out at http://unbalanced-parentheses.nfshost.c ... ator/index - so far no problems (from your code - plenty from mine... :)

Locked