[Lisppaste-cvs] CVS update: lisppaste2/web-server.lisp

[Brian Mastenbrook]

Update of /project/lisppaste/cvsroot/lisppaste2
In directory common-lisp.net:/home/bmastenbrook/lisppaste2

Modified Files:
	web-server.lisp 
Log Message:
Fix minor HTML bogosity

Date: Fri Jun 11 10:35:33 2004
Author: bmastenbrook

Index: lisppaste2/web-server.lisp
diff -u lisppaste2/web-server.lisp:1.55 lisppaste2/web-server.lisp:1.56
--- lisppaste2/web-server.lisp:1.55	Fri Jun 11 08:00:41 2004
+++ lisppaste2/web-server.lisp	Fri Jun 11 10:35:33 2004
@@ -1,4 +1,4 @@
-;;;; $Id: web-server.lisp,v 1.55 2004/06/11 15:00:41 bmastenbrook Exp $
+;;;; $Id: web-server.lisp,v 1.56 2004/06/11 17:35:33 bmastenbrook Exp $
 ;;;; $Source: /project/lisppaste/cvsroot/lisppaste2/web-server.lisp,v $
 
 ;;;; See the LICENSE file for licensing information.
@@ -512,7 +512,7 @@
               `((tr
                  (th "Select a channel:")
                  (td ((select :name "channel")
-		      (option :value "")
+		      ((option :value ""))
 		      ,@(mapcar #'(lambda (e)
 				    `((option :value ,e ,@(if (string-equal e default-channel)
 							      '(:selected "SELECTED")))