Index: openacs-4/packages/dotlrn-ecommerce/www/home.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-ecommerce/www/home.tcl,v
diff -u -r1.8 -r1.9
--- openacs-4/packages/dotlrn-ecommerce/www/home.tcl	3 Sep 2005 07:24:15 -0000	1.8
+++ openacs-4/packages/dotlrn-ecommerce/www/home.tcl	3 Sep 2005 07:28:32 -0000	1.9
@@ -105,6 +105,8 @@
 set sessions_with_applications 0
 # check for patron rels as well
 
+set default_assessment_id [parameter::get -parameter ApplicationAssessment -default ""]
+
     db_multirow -extend { asm_url edit_asm_url } sessions sessions {
 	select c.community_id, c.pretty_name,r.user_id as participant,
 	acs_object__name(r.user_id) as name, r.member_state, r.rel_id
@@ -135,7 +137,7 @@
 	    
 	    where s.community_id = :community_id
 	    and s.course_id = c.item_id
-	    and a.item_id = coalesce(case when c.assessment_id=-1 then null else c.item_id end,57657)
+	    and a.item_id = coalesce(case when c.assessment_id=-1 then null else c.item_id end,:default_assessment_id)
 	    and a.assessment_id = ss.assessment_id
 	    and ss.subject_id = :user_id