Index: openacs-4/www/blank-master.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/www/blank-master.tcl,v
diff -u -r1.5.2.1 -r1.5.2.2
--- openacs-4/www/blank-master.tcl	24 Nov 2003 16:23:23 -0000	1.5.2.1
+++ openacs-4/www/blank-master.tcl	3 Feb 2004 18:49:49 -0000	1.5.2.2
@@ -84,9 +84,12 @@
 
 # Toggle translator mode link
 
-set acs_lang_url [apm_package_url_from_key "acs-lang"]
-set lang_admin_p [permission::permission_p \
-                      -object_id [site_node::get_element -url $acs_lang_url -element object_id] \
-                      -privilege admin \
-                      -party_id [ad_conn untrusted_user_id]]
+if { [empty_string_p $acs_lang_url] } {
+    set lang_admin_p 0
+} else {
+    set lang_admin_p [permission::permission_p \
+                          -object_id [site_node::get_element -url $acs_lang_url -element object_id] \
+                          -privilege admin \
+                          -party_id [ad_conn untrusted_user_id]]
+}
 set toggle_translator_mode_url [export_vars -base "${acs_lang_url}admin/translator-mode-toggle" { { return_url [ad_return_url] } }]