Index: openacs-4/contrib/packages/simulation/lib/object-display.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/contrib/packages/simulation/lib/Attic/object-display.tcl,v
diff -u -r1.12 -r1.13
--- openacs-4/contrib/packages/simulation/lib/object-display.tcl	18 Nov 2003 14:22:55 -0000	1.12
+++ openacs-4/contrib/packages/simulation/lib/object-display.tcl	18 Nov 2003 15:44:57 -0000	1.13
@@ -9,6 +9,7 @@
     {printer_friendly_p:optional 0}
 }
 
+set package_id [ad_conn package_id]
 set root_id [bcms::folder::get_id_by_package_id -parent_id 0]
 
 # This little exercise removes the object/ part from the extra_url
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.12 -r1.13
--- openacs-4/packages/simulation/lib/object-display.tcl	18 Nov 2003 14:22:55 -0000	1.12
+++ openacs-4/packages/simulation/lib/object-display.tcl	18 Nov 2003 15:44:57 -0000	1.13
@@ -9,6 +9,7 @@
     {printer_friendly_p:optional 0}
 }
 
+set package_id [ad_conn package_id]
 set root_id [bcms::folder::get_id_by_package_id -parent_id 0]
 
 # This little exercise removes the object/ part from the extra_url