Revision: 3621 Author: ksprotte URL: http://bknr.net/trac/changeset/3621 renamed old kml-root handler to kml-root-dynamic U trunk/projects/bos/web/kml-handlers.lisp U trunk/projects/bos/web/webserver.lisp Modified: trunk/projects/bos/web/kml-handlers.lisp =================================================================== --- trunk/projects/bos/web/kml-handlers.lisp 2008-07-24 14:43:28 UTC (rev 3620) +++ trunk/projects/bos/web/kml-handlers.lisp 2008-07-24 14:50:37 UTC (rev 3621) @@ -121,7 +121,7 @@ (when (sponsor-info-text sponsor) (text (sponsor-info-text sponsor)))))))) -(defclass kml-root-handler (object-handler) +(defclass kml-root-dynamic-handler (object-handler) ((timestamp :accessor timestamp :initform (get-universal-time)))) (defun write-root-kml (handler sponsor) @@ -187,13 +187,13 @@ :name (dictionary-entry "Country-Stats" lang) :hide-children t)))))) -(defmethod handle-object ((handler kml-root-handler) (object sponsor)) +(defmethod handle-object ((handler kml-root-dynamic-handler) (object sponsor)) (write-root-kml handler object)) -(defmethod handle-object ((handler kml-root-handler) (object contract)) +(defmethod handle-object ((handler kml-root-dynamic-handler) (object contract)) (handle-object handler (contract-sponsor object))) -(defmethod handle-object ((handler kml-root-handler) (object null)) +(defmethod handle-object ((handler kml-root-dynamic-handler) (object null)) (write-root-kml handler nil)) (defclass country-stats-handler (page-handler) Modified: trunk/projects/bos/web/webserver.lisp =================================================================== --- trunk/projects/bos/web/webserver.lisp 2008-07-24 14:43:28 UTC (rev 3620) +++ trunk/projects/bos/web/webserver.lisp 2008-07-24 14:50:37 UTC (rev 3621) @@ -200,6 +200,7 @@ ("/edit-poi-image" edit-poi-image-handler) ("/edit-sponsor" edit-sponsor-handler) ("/kml-upload" kml-upload-handler) + ("/kml-root-dynamic" kml-root-dynamic-handler) ("/kml-root" kml-root-handler) ("/country-stats" country-stats-handler) ("/contract-tree-kml" contract-tree-kml-handler)