Index: openacs-4/packages/dotlrn-ecommerce/www/admin/patrons.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-ecommerce/www/admin/patrons.tcl,v
diff -u -r1.7 -r1.8
--- openacs-4/packages/dotlrn-ecommerce/www/admin/patrons.tcl	1 Sep 2005 12:24:00 -0000	1.7
+++ openacs-4/packages/dotlrn-ecommerce/www/admin/patrons.tcl	9 Sep 2005 05:01:45 -0000	1.8
@@ -93,7 +93,11 @@
 
 ) rels left join acs_rels r
 on (rels.rel_id = r.object_id_one and r.rel_type = 'membership_patron_rel' and rels.patron_id = r.object_id_two)
-left join ec_addresses a
+left join (select *
+	   from ec_addresses
+	   where address_id in (select max(address_id)
+				from ec_addresses
+				group by user_id)) a
 on (r.object_id_two = a.user_id)
 
     order by lower(rels.participant)
@@ -105,9 +109,9 @@
     set relationship [join $relationship ", "]
 
     if { $direction == 1 } {
-	set relationship "$relationship <big>&raquo;</big>"
+	set relationship "<big>&laquo;</big> $relationship"
     } else {
-	set relationship "&laquo; $relationship"
+	set relationship "$relationship <big>&raquo;</big>"
     }
 }
 
Index: openacs-4/packages/dotlrn-ecommerce/www/admin/process-purchase-course.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-ecommerce/www/admin/process-purchase-course.tcl,v
diff -u -r1.21 -r1.22
--- openacs-4/packages/dotlrn-ecommerce/www/admin/process-purchase-course.tcl	6 Sep 2005 04:25:43 -0000	1.21
+++ openacs-4/packages/dotlrn-ecommerce/www/admin/process-purchase-course.tcl	9 Sep 2005 05:01:45 -0000	1.22
@@ -287,7 +287,7 @@
 set related_user_options [linsert [db_list_of_lists related_users {
     select *
     from (
-	  select u.first_names||' '||u.last_name||' (participant is '||(select c.name
+	  select u.first_names||' '||u.last_name||' (purchaser is '||(select c.name
 									from category_object_map m, category_translations c
 									where m.category_id = c.category_id
 									and m.object_id = r.rel_id
@@ -300,7 +300,7 @@
 
 	  union
 
-	  select u.first_names||' '||u.last_name||' (purchaser is '||(select c.name
+	  select u.first_names||' '||u.last_name||' (participant is '||(select c.name
 								      from category_object_map m, category_translations c
 								      where m.category_id = c.category_id
 								      and m.object_id = r.rel_id