[bknr-cvs] r2128 - trunk/projects/bos/worldpay-test

[bknr at bknr.net]

Author: hhubner
Date: 2007-03-16 11:24:19 -0500 (Fri, 16 Mar 2007)
New Revision: 2128

Modified:
   trunk/projects/bos/worldpay-test/poi-handlers.lisp
Log:
Add content language chooser to POI image editor to help translators.


Modified: trunk/projects/bos/worldpay-test/poi-handlers.lisp
===================================================================
--- trunk/projects/bos/worldpay-test/poi-handlers.lisp	2007-03-04 10:25:03 UTC (rev 2127)
+++ trunk/projects/bos/worldpay-test/poi-handlers.lisp	2007-03-16 16:24:19 UTC (rev 2128)
@@ -287,6 +287,7 @@
     (with-bos-cms-page (req :title "Edit POI Image")
       (html
        (cmslink (edit-object-url (poi-image-poi poi-image)) "Back to POI")
+       (content-language-chooser req)
        ((:form :method "post" :enctype "multipart/form-data")
 	((:input :type "hidden" :name "poi" :value poi))
 	(:table (:tr (:td "thumbnail")