Index: openacs-4/packages/imsld/www/admin/index.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/imsld/www/admin/index.tcl,v
diff -u -N -r1.10 -r1.11
--- openacs-4/packages/imsld/www/admin/index.tcl 20 Jun 2006 19:20:39 -0000 1.10
+++ openacs-4/packages/imsld/www/admin/index.tcl 25 Jul 2006 13:44:20 -0000 1.11
@@ -25,9 +25,6 @@
if { ![string eq "" $set_run_id_live] } {
db_dml make_run_live { *SQL* }
}
-if { ![string eq "" $run_imsld_id] } {
- imsld::instance::instantiate_imsld -imsld_id $run_imsld_id -community_id $community_id
-}
set package_id [ad_conn package_id]
permission::require_permission -object_id $package_id -privilege create
@@ -86,7 +83,7 @@
set create_run ""
} else {
set delete_template ""
- set create_run " [_ imsld.create_new_run] "
+ set create_run " [_ imsld.create_new_run] "
}
}