Index: openacs-4/packages/lors-central/www/course-dotlrn-assoc.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/lors-central/www/course-dotlrn-assoc.tcl,v
diff -u -r1.3 -r1.4
--- openacs-4/packages/lors-central/www/course-dotlrn-assoc.tcl	9 Jun 2005 21:03:16 -0000	1.3
+++ openacs-4/packages/lors-central/www/course-dotlrn-assoc.tcl	9 Feb 2009 03:57:30 -0000	1.4
@@ -38,9 +38,8 @@
 
 ##################################### TO ASSOCIATE ##########################################################
 
-db_multirow -extend { rel type } classes_list get_dotlrn_classes { } {
+db_multirow -extend { rel } classes_list get_dotlrn_classes { } {
     set rel [lors_central::relation_between -item_id $item_id -community_id $com_id]
-    set type dotlrn_class_instance
 }
 
 template::list::create \
@@ -54,7 +53,6 @@
     -bulk_action_method post \
     -bulk_action_export_vars {
 	item_id
-        type
     }\
     -row_pretty_plural "[_ lors-central.dotlrn_classes]" \
     -elements {
@@ -169,9 +167,8 @@
 ##################################### COMMUNITIES ###########################################################
 ##################################### TO ASSOCIATE ##########################################################
 
-db_multirow -extend { rel type } coms_list get_dotlrn_coms { } {
+db_multirow -extend { rel } coms_list get_dotlrn_coms { } {
     set rel [lors_central::relation_between -item_id $item_id -community_id $com_id]
-    set type dotlrn_club
 }
 
 template::list::create \
@@ -185,7 +182,6 @@
     -bulk_action_method post \
     -bulk_action_export_vars {
 	item_id
-        type
     }\
     -row_pretty_plural "[_ lors-central.dotlrn_communities]" \
     -elements {
@@ -217,7 +213,7 @@
 
 ############################## TO DROP ASSOCIATION ######################################
 
-db_multirow -extend { rel type } coms_list_drop get_dotlrn_coms_drop { } {
+db_multirow -extend { rel } coms_list_drop get_dotlrn_coms_drop { } {
     set rel [lors_central::relation_between -item_id $item_id -community_id $com_id]
 }
 
@@ -232,7 +228,6 @@
     -bulk_action_method post \
     -bulk_action_export_vars {
 	item_id
-        type
     }\
     -row_pretty_plural "[_ lors-central.dotlrn_classes]" \
     -elements {