Index: openacs-4/packages/simulation/lib/object-display.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/simulation/lib/object-display.tcl,v
diff -u -r1.3 -r1.4
--- openacs-4/packages/simulation/lib/object-display.tcl	17 Oct 2003 09:22:55 -0000	1.3
+++ openacs-4/packages/simulation/lib/object-display.tcl	17 Oct 2003 09:55:53 -0000	1.4
@@ -62,6 +62,7 @@
 
 if { [permission::write_permission_p -object_id $item(item_id)] } {
     set edit_url [export_vars -base [ad_conn package_url]object-edit { { item_id $item(item_id) } }]
+    set delete_url [export_vars -base [ad_conn package_url]object-delete { { item_id $item(item_id) } }]
 }