Index: openacs-4/packages/acs-bootstrap-installer/acs-bootstrap-installer.info =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-bootstrap-installer/acs-bootstrap-installer.info,v diff -u -r1.45.2.10 -r1.45.2.11 --- openacs-4/packages/acs-bootstrap-installer/acs-bootstrap-installer.info 13 Jul 2023 13:09:51 -0000 1.45.2.10 +++ openacs-4/packages/acs-bootstrap-installer/acs-bootstrap-installer.info 18 Jul 2024 14:08:12 -0000 1.45.2.11 @@ -9,7 +9,7 @@ f t - + Don Baccus Bootstraps an OpenACS installation. 2022-08-22 @@ -18,7 +18,7 @@ GPL 3 - + Index: openacs-4/packages/acs-bootstrap-installer/bootstrap.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-bootstrap-installer/bootstrap.tcl,v diff -u -r1.34.2.5 -r1.34.2.6 --- openacs-4/packages/acs-bootstrap-installer/bootstrap.tcl 18 Jul 2024 10:36:04 -0000 1.34.2.5 +++ openacs-4/packages/acs-bootstrap-installer/bootstrap.tcl 18 Jul 2024 14:08:12 -0000 1.34.2.6 @@ -21,15 +21,13 @@ # the system log might be spooled to stderr or the like. #catch { nsv_set acs_properties initial_error_log_length [file size [ns_info log]] } -catch { nsv_set acs_properties logstats [ns_logctl stats] } - # Initialize proc_doc NSV arrays. nsv_set proc_source_file . "" # Initialize ad_after_server_initialization. nsv_set ad_after_server_initialization . "" -ns_log Notice "bootstrap begin encoding [encoding system]" +ns_log Notice "OpenACS bootstrap begin encoding [encoding system]" ### # Index: openacs-4/packages/acs-bootstrap-installer/installer/tcl/zz-postload.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-bootstrap-installer/installer/tcl/zz-postload.tcl,v diff -u -r1.3.2.1 -r1.3.2.2 --- openacs-4/packages/acs-bootstrap-installer/installer/tcl/zz-postload.tcl 13 Jul 2020 12:02:33 -0000 1.3.2.1 +++ openacs-4/packages/acs-bootstrap-installer/installer/tcl/zz-postload.tcl 18 Jul 2024 14:08:12 -0000 1.3.2.2 @@ -19,21 +19,21 @@ ns_log "Notice" "Executing initialization code block $init(name) in $init(script)" if { [llength $init(args)] == 1 } { - set init(args) [lindex $init(args) 0] + set init(args) [lindex $init(args) 0] } if { [catch $init(args) error] } { - ns_log "Error" "Error executing initialization code block $init(name) in $init(script): $::errorInfo" + ns_log "Error" "Error executing initialization code block $init(name) in $init(script): $::errorInfo" } } # The __is_xql helper function is used to filter out just the xql files. # # It should return true for directories it should descend as well -# If you had a large static tree with no .xql files you could return 0 on +# If you had a large static tree with no .xql files you could return 0 on # the subdirectory and it would not be searched. -proc __is_xql {arg} { +proc __is_xql {arg} { return [expr {[file isdirectory $arg] || [file extension $arg] eq ".xql"}] } @@ -47,11 +47,20 @@ ns_log Notice "QD=Postload files to load from $dir: $files" foreach file $files { - db_qd_load_query_file $file + db_qd_load_query_file $file } } nsv_unset ad_after_server_initialization . +ns_log notice "QD=Postload initialize logstats from startup: [ns_logctl stats]" +if {[catch { nsv_set acs_properties logstats [ns_logctl stats] }]} { + # + # Must be a very old version of NaviServer running (before 4.99.7, Feb 2015) + # + ns_log warning "Running apparently a very old version of NaviServer." \ + "Please upgrade for better function coverage!" + nsv_set acs_properties logstats {Error 0} +} # Local variables: # mode: tcl