Index: openacs-4/packages/simulation/tcl/simulation-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/simulation/tcl/simulation-procs.tcl,v
diff -u -r1.4 -r1.5
--- openacs-4/packages/simulation/tcl/simulation-procs.tcl	29 Oct 2003 12:57:13 -0000	1.4
+++ openacs-4/packages/simulation/tcl/simulation-procs.tcl	31 Oct 2003 10:56:40 -0000	1.5
@@ -15,7 +15,7 @@
 } {
     Generate a list of object types formatted as an option list for form-builder's widgets. foo.
 } {
-    set sim_types { sim_character sim_prop sim_home sim_stylesheet image }
+    set sim_types { sim_character sim_prop sim_location sim_stylesheet image }
 
     return [db_list_of_lists object_types "
         select ot.pretty_name,