Index: openacs-4/packages/acs-developer-support/lib/toolbar.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-developer-support/lib/toolbar.adp,v
diff -u -r1.8 -r1.8.2.1
--- openacs-4/packages/acs-developer-support/lib/toolbar.adp 17 Feb 2004 08:35:18 -0000 1.8
+++ openacs-4/packages/acs-developer-support/lib/toolbar.adp 6 Aug 2004 18:07:01 -0000 1.8.2.1
@@ -31,6 +31,10 @@
|
I18n
|
+
+ Translate
+ |
+
Docs
|
API doc
Index: openacs-4/packages/acs-developer-support/lib/toolbar.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-developer-support/lib/toolbar.tcl,v
diff -u -r1.4 -r1.4.2.1
--- openacs-4/packages/acs-developer-support/lib/toolbar.tcl 11 Jan 2004 16:37:03 -0000 1.4
+++ openacs-4/packages/acs-developer-support/lib/toolbar.tcl 6 Aug 2004 18:07:01 -0000 1.4.2.1
@@ -49,5 +49,11 @@
set request_info_label "${page_ms} ms/${db_num_cmds} db/${db_num_ms} ms"
}
}
+ 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]]
+ set toggle_translator_mode_url [export_vars -base "${acs_lang_url}admin/translator-mode-toggle" { { return_url [ad_return_url] } }]
}