Index: openacs-4/packages/assessment/www/admin/index.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/www/admin/index.tcl,v
diff -u -r1.4 -r1.5
--- openacs-4/packages/assessment/www/admin/index.tcl	14 Nov 2004 16:48:08 -0000	1.4
+++ openacs-4/packages/assessment/www/admin/index.tcl	17 Nov 2004 17:16:08 -0000	1.5
@@ -1,4 +1,10 @@
 ad_page_contract {
+
+    Presents a form to upload a QTI ZIP file,
+    lists all assessments and shows a link to 
+    assessment editor and another to assessment
+    catalog.
+    
     @author eperez@it.uc3m.es
     @creation-date 2004-09-21
 } {
@@ -10,6 +16,7 @@
 set title "[_ assessment.Administration]"
 set context {}
 
+#form to upload a QTI ZIP file
 ad_form -name form_upload_file -action {unzip-file} -html {enctype multipart/form-data}  -form {
     {zipfile:file {label "[_ assessment.Import_QTI_ZIP_File]"}}
 }
@@ -20,8 +27,10 @@
     lappend actions "[_ assessment.Admin_catalog]" "catalog/" "[_ assessment.Admin_catalog]"
 }
 
+#get all assessments order by title
 db_multirow assessments get_all_assessments {}
 
+#list all assessments
 list::create \
     -name assessments \
     -key assessment_id \