Revision: 3840 Author: ksprotte URL: http://bknr.net/trac/changeset/3840

fixed: ge country-stats darf nicht [keine name] anzeigen. da soll der ganze l?\195?\164ndername stehen 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:23:52 UTC (rev 3839) +++ trunk/projects/bos/web/kml-handlers.lisp 2008-09-08 12:46:34 UTC (rev 3840) @@ -296,6 +296,8 @@ (multiple-value-bind (number-of-paying-sponsors number-of-sold-m2s) (contract-stats-for-country country) (with-element "Placemark" + (with-element "name" (text (format nil "~A" (dictionary-entry + (second (assoc country *country-english-names*)) lang)))) (with-element "styleUrl" (text "#countryStatsStyle")) (with-element "description" (text (format nil "<p>~A</p><table><tbody><tr><td>~A:</td><td>~D ~A</td></tr>