Index: openacs-4/packages/static-portlet/www/element.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/static-portlet/www/element.tcl,v
diff -u -N -r1.9 -r1.10
--- openacs-4/packages/static-portlet/www/element.tcl	10 Nov 2002 17:44:39 -0000	1.9
+++ openacs-4/packages/static-portlet/www/element.tcl	22 Oct 2003 14:32:10 -0000	1.10
@@ -28,14 +28,17 @@
 }
 
 set title "[_ static-portlet.Edit_content_element]"
-set element_pretty_name [ad_parameter -localize static_admin_portlet_element_pretty_name static-portlet]
+set element_pretty_name [parameter::get -localize -parameter static_admin_portlet_element_pretty_name]
 
 db_1row get_content_element {
     select content, pretty_name
     from static_portal_content
     where content_id = :content_id
 }
 
+set org_pretty_name $pretty_name
+set pretty_name [lang::util::localize $org_pretty_name]
+
 form create static_element
 
 element create static_element pretty_name \
@@ -73,6 +76,14 @@
 if {[form is_valid static_element]} {
     form get_values static_element \
         pretty_name content content_id portal_id referer
+
+    # They didn't change the pretty-name, so use the original version
+    # The reason is that we show the pretty-name in localized form,
+    # but behind the scenes it contains a message key. We don't want to loose that message key
+    # unless we have to
+    if { [string equal $pretty_name [lang::util::localize $org_pretty_name]] } {
+        set pretty_name $org_pretty_name
+    }
     
     db_transaction {
         static_portal_content::update \