Index: openacs-4/packages/simulation/www/object-edit.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/simulation/www/Attic/object-edit.tcl,v
diff -u -r1.16 -r1.17
--- openacs-4/packages/simulation/www/object-edit.tcl	3 Nov 2003 14:13:43 -0000	1.16
+++ openacs-4/packages/simulation/www/object-edit.tcl	7 Nov 2003 16:08:45 -0000	1.17
@@ -12,21 +12,6 @@
 # TODO: Joel will do something about this?
 auth::require_login
 
-#---------------------------------------------------------------------
-# Determine if we are in edit mode or display mode
-#---------------------------------------------------------------------
-# this is prototype code to correct for get_action's apparent
-# unreliability
-
-#set mode [template::form::get_action sim_template]
-#if { ![exists_and_not_null workflow_id]} {
-#    set mode "add"
-#} else {
-#    # for now, use edit mode in place of display mode
-#    #    set mode "display"
-#    set mode "edit"
-#}
-
 if { ![ad_form_new_p -key item_id] } {
     # Get data for existing object
     array set item_info [bcms::item::get_item -item_id $item_id -revision live]
@@ -41,7 +26,6 @@
 }
 set context [list [list "object-list" "Sim Objects"] $page_title]
 
-
 ######################################################################
 #
 # object
@@ -695,8 +679,6 @@
             regexp {__.+__(.+)$} $elm match order_n
             set related_object_id [set $elm]
 
-            ns_log Notice "LARS: $elm - $related_object_id"
-
             if { ![empty_string_p $related_object_id] } {
                 bcms::item::relate_item \
                     -relation_tag $relation_tag \