Index: openacs-4/readme.txt =================================================================== RCS file: /usr/local/cvsroot/openacs-4/readme.txt,v diff -u -r1.19.2.1 -r1.19.2.2 --- openacs-4/readme.txt 13 Jul 2023 13:18:23 -0000 1.19.2.1 +++ openacs-4/readme.txt 2 Sep 2024 11:22:48 -0000 1.19.2.2 @@ -1,6 +1,6 @@ This is OpenACS - the Open Architecture Community System. -Version 5.10.0 +Version 5.10.1 -------------- Full documentation is located in the tarball at Index: openacs-4/tcl/zz-postload.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/tcl/zz-postload.tcl,v diff -u -r1.7.2.3 -r1.7.2.4 --- openacs-4/tcl/zz-postload.tcl 13 Jul 2023 13:18:23 -0000 1.7.2.3 +++ openacs-4/tcl/zz-postload.tcl 2 Sep 2024 11:22:48 -0000 1.7.2.4 @@ -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 Index: openacs-4/www/blank-master.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/www/blank-master.tcl,v diff -u -r1.57.2.4 -r1.57.2.5 --- openacs-4/www/blank-master.tcl 13 Jul 2023 13:19:30 -0000 1.57.2.4 +++ openacs-4/www/blank-master.tcl 2 Sep 2024 11:22:48 -0000 1.57.2.5 @@ -204,16 +204,23 @@ # -content "text/javascript" \ # -http_equiv "Content-Script-Type" - -# Determine if we should be displaying the translation UI # -if {[lang::util::translator_mode_p]} { +# Determine if we should be displaying the translation UI. +# +# We just do this when the developer support is active, but this does +# not have to be this way. By showing the translator mode only for ds, +# we save for large sites a large number of client properties to be +# set via "lang::util::translator_mode_p" and +# "ad_get_client_property". +# +set ds_active [expr {[namespace which ::ds_show_p] ne {} && [::ds_show_p]}] +if {$ds_active && [lang::util::translator_mode_p]} { template::add_footer -src "/packages/acs-lang/lib/messages-to-translate" } # Determine if developer support is installed and enabled # -if {[namespace which ::ds_show_p] ne {} && [ds_show_p]} { +if {$ds_active} { template::head::add_css \ -href "/resources/acs-developer-support/acs-developer-support.css" \ -media "all"