Index: openacs-4/contrib/packages/simulation/tcl/object-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/contrib/packages/simulation/tcl/Attic/object-procs.tcl,v
diff -u -r1.8 -r1.9
--- openacs-4/contrib/packages/simulation/tcl/object-procs.tcl	12 Jan 2004 15:56:58 -0000	1.8
+++ openacs-4/contrib/packages/simulation/tcl/object-procs.tcl	11 Feb 2004 13:45:58 -0000	1.9
@@ -322,7 +322,7 @@
               order by ci.name
         "
         db_foreach select_on_map_objects $query {
-            set url [simulation::object::content_url -package_id $package_id -name $uri]
+            set url [simulation::object::url -package_id $package_id -name $uri]
 
             set thumbnail_url ""
             if { [lsearch -exact {sim_location sim_prop sim_character} $content_type] != -1 } {
Index: openacs-4/packages/simulation/tcl/object-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/simulation/tcl/object-procs.tcl,v
diff -u -r1.8 -r1.9
--- openacs-4/packages/simulation/tcl/object-procs.tcl	12 Jan 2004 15:56:58 -0000	1.8
+++ openacs-4/packages/simulation/tcl/object-procs.tcl	11 Feb 2004 13:45:58 -0000	1.9
@@ -322,7 +322,7 @@
               order by ci.name
         "
         db_foreach select_on_map_objects $query {
-            set url [simulation::object::content_url -package_id $package_id -name $uri]
+            set url [simulation::object::url -package_id $package_id -name $uri]
 
             set thumbnail_url ""
             if { [lsearch -exact {sim_location sim_prop sim_character} $content_type] != -1 } {