Index: openacs-4/packages/dotlrn/www/members-chunk-table.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/members-chunk-table.tcl,v
diff -u -r1.32.2.2 -r1.32.2.3
--- openacs-4/packages/dotlrn/www/members-chunk-table.tcl	13 Sep 2022 10:34:53 -0000	1.32.2.2
+++ openacs-4/packages/dotlrn/www/members-chunk-table.tcl	24 Oct 2022 10:57:09 -0000	1.32.2.3
@@ -68,10 +68,10 @@
 set community_name [dotlrn_community::get_community_name $community_id]
 
 if {$order_direction eq "asc" } {
-    set order_html "<img src=\"/resources/dotlrn/down.gif\" height=15 width=15>"
+    set order_html "↓"
     set opposite_order_direction "desc"
 } else {
-    set order_html "<img src=\"/resources/dotlrn/up.gif\" height=15 width=15>"
+    set order_html "↑"
     set opposite_order_direction "asc"
 }
 
Index: openacs-4/packages/dotlrn/www/admin/dotlrn-admins.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/admin/dotlrn-admins.tcl,v
diff -u -r1.10 -r1.10.2.1
--- openacs-4/packages/dotlrn/www/admin/dotlrn-admins.tcl	7 Aug 2017 23:48:09 -0000	1.10
+++ openacs-4/packages/dotlrn/www/admin/dotlrn-admins.tcl	24 Oct 2022 10:57:09 -0000	1.10.2.1
@@ -25,50 +25,50 @@
 #Pages in this directory are only runnable by dotlrn-wide admins.
 dotlrn::require_admin 
 
-set context_bar "[_ dotlrn.Administrators]"
+set context_bar [_ dotlrn.Administrators]
 set referer [ns_conn url]
 
-set dotlrn_admins_group [db_string group_id_from_name "
-            select group_id from groups where group_name='dotlrn-admin'" -default ""]
+set dotlrn_admins_group [db_string group_id_from_name {
+    select group_id from groups where group_name='dotlrn-admin'} -default ""]
 
 set admin_id [ad_conn user_id]
 
 set elements [list user \
-		  [list label "[_ dotlrn.User]"\
-                   link_url_col user_url ] \
-                   remove \
+		  [list label "[_ dotlrn.User]" \
+                       link_url_col user_url ] \
+                  remove \
                   [list label "[_ dotlrn.Remove]" \
-                   link_url_col remove_url \
-		       display_template { <if @dotlrn_admins.no_auto_remove@ true><center><img src="/resources/acs-subsite/Delete16.gif" width="16" height="16" border="0"></center></if> } \
+                       link_url_col remove_url \
+		       display_template { <if @dotlrn_admins.no_auto_remove@ true><center><adp:icon name="trash"></center></if> } \
                        sub_class narrow ] \
-		  ]
+                 ]
 
 set multirow_name dotlrn_admins
 set actions ""
 
 template::list::create \
-     -name dotlrn_admins \
-     -multirow $multirow_name \
-     -actions $actions \
-    -no_data "[_ dotlrn.No_dotlrn-admins]" \
-     -elements $elements
+    -name dotlrn_admins \
+    -multirow $multirow_name \
+    -actions $actions \
+    -no_data [_ dotlrn.No_dotlrn-admins] \
+    -elements $elements
 
 db_multirow \
     -extend {
-       user
-       remove_url
-       user_url
-       no_auto_remove 
+        user
+        remove_url
+        user_url
+        no_auto_remove 
     } dotlrn_admins dotlrn_admins_select {} {
         append user $last_name ", " $first_names " (" $email " )"
 	set remove_url [export_vars -base "admin-remove" {user_id}]
         set user_url [export_vars -base "user" {user_id}] 
-       if { $user_id == $admin_id } {
+        if { $user_id == $admin_id } {
             set no_auto_remove 0
 	} else {
             set no_auto_remove 1
 	}  
- }
+    }
 
 # Local variables:
 #    mode: tcl