[bknr-cvs] r2455 - branches/trunk-reorg/bknr/web/src/web

[hhubner at common-lisp.net]

Author: hhubner
Date: Sun Feb 10 04:02:46 2008
New Revision: 2455

Modified:
   branches/trunk-reorg/bknr/web/src/web/handlers.lisp
Log:
fix syntax error that has not been detected by cmucl

Modified: branches/trunk-reorg/bknr/web/src/web/handlers.lisp
==============================================================================
--- branches/trunk-reorg/bknr/web/src/web/handlers.lisp	(original)
+++ branches/trunk-reorg/bknr/web/src/web/handlers.lisp	Sun Feb 10 04:02:46 2008
@@ -406,8 +406,8 @@
 
 (defgeneric object-date-list-handler-grouped-objects (handler object))
 
-(defmethod object-date-list-handler-date ((handler object-date-list-handler object-list-handler)
-					  object)
+(defmethod object-date-list-handler-date ((handler object-date-list-handler)
+                                          object)
   (with-query-params (date)
     (get-daytime (if date
 		     (or (parse-integer date :junk-allowed t)