Index: openacs-4/packages/assessment/www/asm-admin/one-a.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/www/asm-admin/one-a.adp,v
diff -u -r1.11.2.6 -r1.11.2.7
--- openacs-4/packages/assessment/www/asm-admin/one-a.adp	20 Jul 2005 15:36:13 -0000	1.11.2.6
+++ openacs-4/packages/assessment/www/asm-admin/one-a.adp	20 Jul 2005 17:08:12 -0000	1.11.2.7
@@ -100,7 +100,7 @@
 
 </table>
 <br>
-
+<listtemplate name=sections></listtemplate>
 <if @sections:rowcount@ eq 0>
 <font color=red><b>#assessment.add_section_first#</b></font>
 </if>
@@ -110,7 +110,7 @@
 
 <table cellspacing=0>
 <tr class="odd">
-<td valign="top">@sections.rownum@. @sections.name@</td></tr>
+<td valign="top"><a name=@sections.section_id@>@sections.rownum@. @sections.name@</a></td></tr>
 <tr class="odd">
 <td>
 
Index: openacs-4/packages/assessment/www/asm-admin/one-a.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/www/asm-admin/one-a.tcl,v
diff -u -r1.9.2.3 -r1.9.2.4
--- openacs-4/packages/assessment/www/asm-admin/one-a.tcl	18 Jul 2005 18:01:01 -0000	1.9.2.3
+++ openacs-4/packages/assessment/www/asm-admin/one-a.tcl	20 Jul 2005 17:08:12 -0000	1.9.2.4
@@ -79,4 +79,17 @@
     set max_time_to_complete [as::assessment::pretty_time -seconds $max_time_to_complete]
 }
 
+list::create \
+    -name sections \
+    -pass_properties assessment_id \
+    -multirow sections \
+    -key section_id \
+    -no_data "[_ assessment.None]" \
+    -elements {
+	title {
+	    label "[_ assessment.Sections]"
+	    display_template {<a href="one-a?assessment_id=@assessment_id@\#@sections.section_id@">@sections.title;noquote@</a>} 
+	}
+    }
+
 ad_return_template