Index: openacs-4/packages/acs-subsite/www/admin/applications/application-add.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/admin/applications/application-add.tcl,v diff -u -r1.13 -r1.14 --- openacs-4/packages/acs-subsite/www/admin/applications/application-add.tcl 7 Aug 2017 23:47:58 -0000 1.13 +++ openacs-4/packages/acs-subsite/www/admin/applications/application-add.tcl 21 Jan 2018 00:35:29 -0000 1.14 @@ -80,17 +80,22 @@ form set_error application folder "This folder name is already used" break } + } -new_data { - if { [catch { + ad_try { site_node::instantiate_and_mount \ -parent_node_id [ad_conn node_id] \ -node_name $folder \ -package_name $instance_name \ -package_key $package_key - } errmsg] } { - ns_log Error "Error creating application: $errmsg\n$::errorInfo" - ad_return_error "Problem Creating Application" "We had a problem creating the application." + } on error {errorMsg} { + ad_log warning "Problem creating application: $errorMsg" + ad_return_error \ + "Problem Creating Application" \ + "We had a problem creating the application." + ad_script_abort } + } -edit_data { # this is where we would rename ... @@ -102,6 +107,7 @@ site_node::rename -node_id $node_id -name $folder } + } -after_submit { ad_returnredirect $return_url ad_script_abort