Index: openacs-4/packages/dotlrn-portlet/tcl/dotlrn-portlet-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-portlet/tcl/dotlrn-portlet-procs.tcl,v
diff -u -r1.3 -r1.4
--- openacs-4/packages/dotlrn-portlet/tcl/dotlrn-portlet-procs.tcl	9 Oct 2001 05:04:25 -0000	1.3
+++ openacs-4/packages/dotlrn-portlet/tcl/dotlrn-portlet-procs.tcl	9 Oct 2001 14:36:47 -0000	1.4
@@ -33,7 +33,7 @@
 	@creation-date Sept 2001
     } {
 	# Tell portal to add this element to the page
-	set element_id [portal::add_element $page_id [my_name]]
+	set element_id [portal::add_element_to_region $page_id [my_name] 2]
 	
 	# The default param must be configured
 	set key "community_id"
@@ -68,6 +68,8 @@
 	    set data "Community info not found. Contact webmaster, please!"
 	}
 
+	append data "<p><a href=student-list>List of Students</a>"
+
 	ns_log notice "AKS-dotlrn-portlet got here $data"
 	
 	return $data