Index: openacs-4/packages/curriculum-central/www/coordinate/stream-view.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/curriculum-central/www/coordinate/stream-view.tcl,v
diff -u -N -r1.5 -r1.6
--- openacs-4/packages/curriculum-central/www/coordinate/stream-view.tcl	25 Jan 2006 12:25:52 -0000	1.5
+++ openacs-4/packages/curriculum-central/www/coordinate/stream-view.tcl	25 Jan 2006 12:45:17 -0000	1.6
@@ -34,6 +34,8 @@
 set modified_p 0
 set modified_list [list]
 
+set return_url [export_vars -base stream-view {stream_id}]
+
 foreach uos $units_of_study {
     set map_id [lindex $uos 0]
     set uos_code [lindex $uos 1]
@@ -67,7 +69,6 @@
 	# when using the <group> tag in the template.
 	set group "$year_id$semester_id"
 
-	set return_url [export_vars -base stream-view {stream_id}]
 	set edit_url [export_vars -base stream-map-ae \
 			  {stream_id uos_id map_id return_url}]
 	set delete_url [export_vars -base stream-map-del \
@@ -79,16 +80,17 @@
     }
 }
 
+set add_url [export_vars -base stream-map-ae {stream_id return_url}]
 set publish_url [export_vars -base stream-publish {stream_id modified_list}]
 
 # Sort stream info by increasing year and semester.
 template::multirow sort stream -increasing year_id semester_id
 
 # Get all UoS that are no longer offered.  These are UoS that were
 # previously mapped, but now have a year_id that is set to 0.
-db_multirow -extend {edit_url} not_offered not_offered {} {
-    set return_url [export_vars -base stream-view {stream_id}]
+db_multirow -extend {edit_url delete_url} not_offered not_offered {} {
     set edit_url [export_vars -base stream-map-ae {stream_id uos_id map_id return_url}]
+    set delete_url [export_vars -base stream-map-del {stream_id map_id return_url}]
 }
 
 ad_return_template