Index: openacs-4/packages/acs-bootstrap-installer/installer.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-bootstrap-installer/installer.tcl,v diff -u -r1.24.2.5 -r1.24.2.6 --- openacs-4/packages/acs-bootstrap-installer/installer.tcl 9 Aug 2014 08:06:26 -0000 1.24.2.5 +++ openacs-4/packages/acs-bootstrap-installer/installer.tcl 9 Aug 2014 08:48:10 -0000 1.24.2.6 @@ -359,8 +359,11 @@ set result "" if {[array size errors] > 0} { append result "
\n"
-	foreach {key value} [array get errors] {
-	    append result "$key:\n[ad_quotehtml $value]\n"
+	foreach {package errorInfos} [array get errors] {
+	    append result "

Error in Package $package:

\n" + foreach {fileName backTrace} $errorInfos { + append result "Error in File $fileName\n\n[ad_quotehtml $backTrace]\n\n\n" + } } append result "
\n" } @@ -414,7 +417,7 @@ apm_source [acs_package_root_dir acs-tcl]/tcl/database-init.tcl errors if {[array size errors] > 0} { - ns_write "Errors during initial load:\n" + ns_write "

Errors during initial load:

" ns_write [install_load_errors_formatted errors] } @@ -463,12 +466,18 @@ apm_bootstrap_load_queries acs-subsite install_redefine_ad_conn + if {[array size errors] > 0} { + ns_write "

Errors during load of acs-tcl init or package acs-subsite

\n" + ns_write [install_load_errors_formatted errors] + return + } + # Attempt to install all packages. set dependency_results [apm_dependency_check -initial_install [apm_scan_packages -new [file join $::acs::rootdir packages]]] set dependencies_satisfied_p [lindex $dependency_results 0] set pkg_list [lindex $dependency_results 1] - if { !$dependencies_satisfied_p } { + if { !$dependencies_satisfied_p } { ns_write "

At least one core package has an unsatisifed dependency.\ No packages have been installed missing: [lindex $dependency_results 2]. \ Here's what the APM has computed:" @@ -478,9 +487,6 @@ lassign $dep _name _path _a _b _pkg _deps _flag _msg ns_write "

  • [lindex $_pkg 0]: $_msg
  • " } - ns_write "\n\n" - ns_write [install_load_errors_formatted errors] - return }