Index: openacs-4/packages/dotlrn/www/members.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/members.tcl,v
diff -u -N -r1.27.2.3 -r1.27.2.4
--- openacs-4/packages/dotlrn/www/members.tcl	19 Aug 2008 11:57:36 -0000	1.27.2.3
+++ openacs-4/packages/dotlrn/www/members.tcl	19 Aug 2008 12:01:25 -0000	1.27.2.4
@@ -36,6 +36,8 @@
 set referer [ns_conn url]
 set return_url "[ns_conn url]?[ns_conn query]"
 
+set csv_p [exists_and_not_null csv]
+
 set site_wide_admin_p [permission::permission_p -object_id [acs_magic_object security_context_root]  -privilege admin]
 
 if {!$site_wide_admin_p} {
@@ -79,7 +81,7 @@
 set bulk_actions_export_vars ""
 set actions ""
 
-if {$admin_p} {
+if {$admin_p && !$csv_p} {
     set bulk_actions [list "[_ dotlrn.Drop_Membership]" "deregister" "[_ dotlrn.Drop_Membership]"]
     set bulk_actions_export_vars [list "user_id" "referer" "reset"]
     set actions [list "CSV" "members?csv=yes" "[_ dotlrn.Comma_Separated_Values]"]
@@ -105,6 +107,7 @@
         </if>
 
         }
+        hide_p $csv_p
     } last_name {
         label "[_ acs-subsite.Last_name]"
         html "align left"
@@ -127,7 +130,7 @@
     } 
 }
 
-if {$admin_p} {
+if {$admin_p && !$csv_p} {
     lappend elm_list {action} {
         label "[_ dotlrn.Actions]"
         html "align left"
@@ -164,7 +167,7 @@
     set role [dotlrn_community::get_role_pretty_name -community_id $community_id -rel_type $rel_type]
 }
 
-if { [exists_and_not_null csv] } {
+if { $csv_p } {
     template::list::write_output -name members
 }