Index: openacs-4/packages/dotlrn/www/admin/user.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/admin/user.adp,v
diff -u -N -r1.29 -r1.30
--- openacs-4/packages/dotlrn/www/admin/user.adp	13 Jan 2005 13:57:22 -0000	1.29
+++ openacs-4/packages/dotlrn/www/admin/user.adp	20 Jul 2006 04:15:09 -0000	1.30
@@ -194,6 +194,9 @@
   <if @portrait_p@>
     <li><a href="/user/portrait/index.tcl?@export_edit_vars@">#dotlrn.lt_Manage_this_users_por#</a></li>
   </if>
+ <if @oacs_site_wide_admin_p@ true>
+  <li><a href="@toggle_swa_url;noquote@">@toggle_text;noquote@</a></li>
+ </if>
  <if @oacs_site_wide_admin_p@ true or @dotlrn_admin_p@ true>
   <li><a href="become?user_id=@user_id@">#dotlrn.Become_this_user#</a></li>
  </if> 
Index: openacs-4/packages/dotlrn/www/admin/user.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/admin/user.tcl,v
diff -u -N -r1.19 -r1.20
--- openacs-4/packages/dotlrn/www/admin/user.tcl	13 Jan 2005 13:57:22 -0000	1.19
+++ openacs-4/packages/dotlrn/www/admin/user.tcl	20 Jul 2006 04:15:09 -0000	1.20
@@ -110,4 +110,13 @@
 
 set dual_approve_return_url [ns_urlencode [dotlrn::get_admin_url]/user-new-2?user_id=$user_id&referer=$return_url]
 
+if {$site_wide_admin_p} {
+    set toggle_value revoke
+    set toggle_text [_ dotlrn.Revoke_site_wide_admin]
+} else {
+    set toggle_value grant
+    set toggle_text [_ dotlrn.Grant_site_wide_admin]
+}
+set toggle_swa_url [export_vars -base "site-wide-admin-toggle" {user_id {value $toggle_value} {referer $return_url}}]
+
 ad_return_template