Index: openacs-4/packages/dotlrn-ecommerce/www/applications.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-ecommerce/www/applications.tcl,v
diff -u -r1.3 -r1.4
--- openacs-4/packages/dotlrn-ecommerce/www/applications.tcl	19 Jul 2005 18:15:09 -0000	1.3
+++ openacs-4/packages/dotlrn-ecommerce/www/applications.tcl	20 Jul 2005 17:41:07 -0000	1.4
@@ -73,8 +73,14 @@
 	where r.community_id = c.community_id
 	and member_state in ('needs approval', 'awaiting payment')
     } {
-	set approve_url [export_vars -base application-approve { community_id {user_id $applicant_user_id} }]
-	set reject_url [export_vars -base application-reject { community_id {user_id $applicant_user_id} }]
+	if { $member_state == "needs approval" } {
+	    set list_type full
+	} elseif { $member_state == "awaiting payment" } {
+	    set list_type payment
+	}
+
+	set approve_url [export_vars -base application-approve { community_id {user_id $applicant_user_id} {type $list_type} }]
+	set reject_url [export_vars -base application-reject { community_id {user_id $applicant_user_id} {type $list_type} }]
 	
 	# Get associated assessment
 	if { [db_0or1row assessment {