Revision: 3841 Author: ksprotte URL: http://bknr.net/trac/changeset/3841 ge country-stats use shorter description in left panel by adding a kml "Snippet" U trunk/projects/bos/web/kml-handlers.lisp Modified: trunk/projects/bos/web/kml-handlers.lisp =================================================================== --- trunk/projects/bos/web/kml-handlers.lisp 2008-09-08 12:46:34 UTC (rev 3840) +++ trunk/projects/bos/web/kml-handlers.lisp 2008-09-08 12:51:00 UTC (rev 3841) @@ -311,6 +311,12 @@ (dictionary-entry "sponsors" lang)) (dictionary-entry "total contribution" lang) number-of-sold-m2s))) + (with-element "Snippet" + (text (format nil "~A ~A" + number-of-paying-sponsors + (if (= 1 number-of-paying-sponsors) + (dictionary-entry "sponsor" lang) + (dictionary-entry "sponsors" lang))))) (with-element "Point" (with-element "coordinates" (text (format nil "~,20F,~,20F,0" lat lon)))))))))))))))