Index: openacs-4/packages/curriculum-central/www/all-uos-ga-map.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/curriculum-central/www/all-uos-ga-map.tcl,v
diff -u -r1.2 -r1.3
--- openacs-4/packages/curriculum-central/www/all-uos-ga-map.tcl	20 Feb 2006 09:40:38 -0000	1.2
+++ openacs-4/packages/curriculum-central/www/all-uos-ga-map.tcl	18 May 2006 02:56:10 -0000	1.3
@@ -50,21 +50,19 @@
 # Retrieve a list of Units of Study.
 set units_of_study [db_list_of_lists units_of_study {}]
 
-template::multirow create stream map_id year_id year_name \
+template::multirow create stream year_id year_name \
     session_id session_name core_or_not uos_id uos_code uos_name \
     year_session_group uos_details_url float_class
 
 foreach uos $units_of_study {
-    set map_id [lindex $uos 0]
-    set uos_code [lindex $uos 1]
-    set uos_name [lindex $uos 2]
-    set uos_id [lindex $uos 3]
-    set year_id [lindex $uos 4]
-    set year_name [lindex $uos 5]
-    set core_id [lindex $uos 6]
-    set live_revision_id [lindex $uos 7]
-    set session_ids [lindex $uos 8]
-    set uos_name_id [lindex $uos 9]
+    set uos_code [lindex $uos 0]
+    set uos_name [lindex $uos 1]
+    set uos_id [lindex $uos 2]
+    set year_id [lindex $uos 3]
+    set year_name [lindex $uos 4]
+    set core_id [lindex $uos 5]
+    set session_ids [lindex $uos 6]
+    set uos_name_id [lindex $uos 7]
 
     foreach session_id $session_ids {
 	
@@ -94,7 +92,7 @@
 	    }
 	}
 
-	template::multirow append stream $map_id $year_id $year_name \
+	template::multirow append stream $year_id $year_name \
 	    $session_id $session_name $core_id $uos_id $uos_code $uos_name \
 	    $year_session_group $uos_details_url $float_class