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.17 -r1.18
--- openacs-4/packages/dotlrn-ecommerce/www/applications.tcl	5 Aug 2005 09:22:52 -0000	1.17
+++ openacs-4/packages/dotlrn-ecommerce/www/applications.tcl	7 Aug 2005 13:30:53 -0000	1.18
@@ -50,6 +50,7 @@
     -name "applications" \
     -multirow "applications" \
     -no_data "[_ dotlrn-ecommerce.No_applications]" \
+    -pass_properties { return_url } \
     -page_flush_p 1 \
     -pass_properties { admin_p return_url _type } \
     -elements {
@@ -100,6 +101,12 @@
                 <elseif @applications.member_state@ eq "payment received">
 		[_ dotlrn-ecommerce.lt_User_application_appr]
                 </elseif>
+                <elseif @applications.member_state@ eq "waitinglist approved">
+		[_ dotlrn-ecommerce.lt_User_approved_waiting]
+                </elseif>
+                <elseif @applications.member_state@ eq "request approved">
+		[_ dotlrn-ecommerce.lt_User_has_approved_pre]
+                </elseif>
 		<else>
 		[_ dotlrn-ecommerce.lt_User_has_submitted_an]
 		</else>
@@ -217,8 +224,8 @@
 }] {
     set list_type [ad_decode $member_state "needs approval" full "request approval" prereq "awaiting payment" payment full]
 
-    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} }]
+    set approve_url [export_vars -base application-approve { community_id {user_id $applicant_user_id} {type $list_type} return_url }]
+    set reject_url [export_vars -base application-reject { community_id {user_id $applicant_user_id} {type $list_type} return_url }]
     
     if { $member_state == "needs approval" || 
 	 $member_state == "awaiting payment" ||