Index: openacs-4/packages/acs-admin/tcl/test/acs-admin-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-admin/tcl/test/acs-admin-procs.tcl,v diff -u -r1.6.2.14 -r1.6.2.15 --- openacs-4/packages/acs-admin/tcl/test/acs-admin-procs.tcl 21 Apr 2023 12:27:29 -0000 1.6.2.14 +++ openacs-4/packages/acs-admin/tcl/test/acs-admin-procs.tcl 14 Jun 2023 08:40:24 -0000 1.6.2.15 @@ -6,26 +6,30 @@ @cvs-id $Id$ } -aa_register_case -cats { - smoke production_safe -} -procs { - util::which - apm_tar_cmd - apm_gzip_cmd -} acs_admin_exec_dependencies { - Test external command dependencies for this package. -} { - foreach cmd [list \ - [::util::which openssl] \ - [::util::which [apm_tar_cmd]] \ - [::util::which [apm_gzip_cmd]] \ - [file join $::acs::rootdir bin cd-helper] \ - [::util::which cvs] \ - [util::which uptime] - ] { - aa_true "'$cmd' is executable" [file executable $cmd] - } -} +# +# This test could be used to make sure binaries in use in the code are +# actually available to the system. +# +# aa_register_case -cats { +# smoke production_safe +# } -procs { +# util::which +# apm_tar_cmd +# apm_gzip_cmd +# } acs_admin_exec_dependencies { +# Test external command dependencies for this package. +# } { +# foreach cmd [list \ +# [::util::which openssl] \ +# [::util::which [apm_tar_cmd]] \ +# [::util::which [apm_gzip_cmd]] \ +# [file join $::acs::rootdir bin cd-helper] \ +# [::util::which cvs] \ +# [util::which uptime] +# ] { +# aa_true "'$cmd' is executable" [file executable $cmd] +# } +# } aa_register_case -cats { api smoke Index: openacs-4/packages/acs-content-repository/tcl/test/acs-content-repository-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-content-repository/tcl/test/acs-content-repository-procs.tcl,v diff -u -r1.9.2.2 -r1.9.2.3 --- openacs-4/packages/acs-content-repository/tcl/test/acs-content-repository-procs.tcl 20 Apr 2023 13:32:47 -0000 1.9.2.2 +++ openacs-4/packages/acs-content-repository/tcl/test/acs-content-repository-procs.tcl 14 Jun 2023 08:40:24 -0000 1.9.2.3 @@ -6,21 +6,25 @@ @cvs-id $Id$ } -aa_register_case -cats { - smoke production_safe -} -procs { - image::identify_binary - image::convert_binary -} acs_content_repository_exec_dependencies { - Test external command dependencies for this package. -} { - foreach cmd [list \ - [::image::identify_binary] \ - [::image::convert_binary] - ] { - aa_true "'$cmd' is executable" [file executable $cmd] - } -} +# +# This test could be used to make sure binaries in use in the code are +# actually available to the system. +# +# aa_register_case -cats { +# smoke production_safe +# } -procs { +# image::identify_binary +# image::convert_binary +# } acs_content_repository_exec_dependencies { +# Test external command dependencies for this package. +# } { +# foreach cmd [list \ +# [::image::identify_binary] \ +# [::image::convert_binary] +# ] { +# aa_true "'$cmd' is executable" [file executable $cmd] +# } +# } aa_register_case \ -cats {smoke api db} \ Index: openacs-4/packages/acs-tcl/tcl/security-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/security-procs.tcl,v diff -u -r1.126.2.94 -r1.126.2.95 --- openacs-4/packages/acs-tcl/tcl/security-procs.tcl 6 Jun 2023 09:07:18 -0000 1.126.2.94 +++ openacs-4/packages/acs-tcl/tcl/security-procs.tcl 14 Jun 2023 08:40:23 -0000 1.126.2.95 @@ -1444,6 +1444,7 @@ -parameter OfferedRegistries \ -package_id $subsite_id \ -default *] + set result {} if {[nsf::is object ::xo::Authorize]} { foreach auth_obj [::xo::Authorize info instances -closure] { Index: openacs-4/packages/acs-tcl/tcl/test/acs-tcl-test-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/test/acs-tcl-test-procs.tcl,v diff -u -r1.71.2.55 -r1.71.2.56 --- openacs-4/packages/acs-tcl/tcl/test/acs-tcl-test-procs.tcl 24 Apr 2023 13:53:29 -0000 1.71.2.55 +++ openacs-4/packages/acs-tcl/tcl/test/acs-tcl-test-procs.tcl 14 Jun 2023 08:40:23 -0000 1.71.2.56 @@ -1490,39 +1490,43 @@ } } -aa_register_case -cats { - smoke production_safe -} -procs { - util::which - apm_tar_cmd - apm_gzip_cmd - db_get_pgbin - db_name -} acs_tcl_exec_dependencies { - Test external command dependencies for this package. -} { - set commands [list \ - [::util::which [apm_tar_cmd]] \ - [::util::which [apm_gzip_cmd]] \ - [parameter::get -parameter "HtmlDocBin" -default "/usr/bin/htmldoc"] \ - [::util::which pdfinfo] \ - [::util::which diff] \ - [::util::which dot] \ - [::util::which gzip] \ - [::util::which curl] \ - ] +# +# This test could be used to make sure binaries in use in the code are +# actually available to the system. +# +# aa_register_case -cats { +# smoke production_safe +# } -procs { +# util::which +# apm_tar_cmd +# apm_gzip_cmd +# db_get_pgbin +# db_name +# } acs_tcl_exec_dependencies { +# Test external command dependencies for this package. +# } { +# set commands [list \ +# [::util::which [apm_tar_cmd]] \ +# [::util::which [apm_gzip_cmd]] \ +# [parameter::get -parameter "HtmlDocBin" -default "/usr/bin/htmldoc"] \ +# [::util::which pdfinfo] \ +# [::util::which diff] \ +# [::util::which dot] \ +# [::util::which gzip] \ +# [::util::which curl] \ +# ] - if {[db_name] eq "PostgreSQL"} { - # - # On a Posgtgres-enabled installation, we also want psql. - # - lappend commands [file join [db_get_pgbin] psql] - } +# if {[db_name] eq "PostgreSQL"} { +# # +# # On a Posgtgres-enabled installation, we also want psql. +# # +# lappend commands [file join [db_get_pgbin] psql] +# } - foreach cmd $commands { - aa_true "'$cmd' is executable" [file executable $cmd] - } -} +# foreach cmd $commands { +# aa_true "'$cmd' is executable" [file executable $cmd] +# } +# } # Local variables: # mode: tcl Index: openacs-4/packages/search/tcl/test/search-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/search/tcl/test/search-procs.tcl,v diff -u -r1.1.2.8 -r1.1.2.9 --- openacs-4/packages/search/tcl/test/search-procs.tcl 20 Apr 2023 15:04:48 -0000 1.1.2.8 +++ openacs-4/packages/search/tcl/test/search-procs.tcl 14 Jun 2023 08:40:24 -0000 1.1.2.9 @@ -4,26 +4,30 @@ } -aa_register_case -cats { - smoke production_safe -} -procs { - util::which - apm_tar_cmd - apm_gzip_cmd -} search_exec_dependencies { - Test external command dependencies for this package. -} { - foreach cmd [list \ - [::util::which unzip] \ - [::util::which file] \ - [::util::which catdoc] \ - [::util::which xls2csv] \ - [::util::which catppt] \ - [::util::which pdftotext] \ - ] { - aa_true "'$cmd' is executable" [file executable $cmd] - } -} +# +# This test could be used to make sure binaries in use in the code are +# actually available to the system. +# +# aa_register_case -cats { +# smoke production_safe +# } -procs { +# util::which +# apm_tar_cmd +# apm_gzip_cmd +# } search_exec_dependencies { +# Test external command dependencies for this package. +# } { +# foreach cmd [list \ +# [::util::which unzip] \ +# [::util::which file] \ +# [::util::which catdoc] \ +# [::util::which xls2csv] \ +# [::util::which catppt] \ +# [::util::which pdftotext] \ +# ] { +# aa_true "'$cmd' is executable" [file executable $cmd] +# } +# } aa_register_case \ -cats {api smoke} \ Index: openacs-4/packages/xotcl-core/tcl/test/xotcl-test-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/xotcl-core/tcl/test/xotcl-test-procs.tcl,v diff -u -r1.1.2.31 -r1.1.2.32 --- openacs-4/packages/xotcl-core/tcl/test/xotcl-test-procs.tcl 20 Apr 2023 15:08:55 -0000 1.1.2.31 +++ openacs-4/packages/xotcl-core/tcl/test/xotcl-test-procs.tcl 14 Jun 2023 08:40:23 -0000 1.1.2.32 @@ -2,21 +2,25 @@ Test xotcl-core features } -aa_register_case -cats { - smoke production_safe -} -procs { - util::which - apm_tar_cmd - apm_gzip_cmd -} xotcl_core_exec_dependencies { - Test external command dependencies for this package. -} { - foreach cmd [list \ - [::util::which dot] \ - ] { - aa_true "'$cmd' is executable" [file executable $cmd] - } -} +# +# This test could be used to make sure binaries in use in the code are +# actually available to the system. +# +# aa_register_case -cats { +# smoke production_safe +# } -procs { +# util::which +# apm_tar_cmd +# apm_gzip_cmd +# } xotcl_core_exec_dependencies { +# Test external command dependencies for this package. +# } { +# foreach cmd [list \ +# [::util::which dot] \ +# ] { +# aa_true "'$cmd' is executable" [file executable $cmd] +# } +# } aa_register_case -cats { api smoke Index: openacs-4/packages/xowf/tcl/test/xowf-test-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/xowf/tcl/test/xowf-test-procs.tcl,v diff -u -r1.14.2.23 -r1.14.2.24 --- openacs-4/packages/xowf/tcl/test/xowf-test-procs.tcl 20 Apr 2023 15:21:28 -0000 1.14.2.23 +++ openacs-4/packages/xowf/tcl/test/xowf-test-procs.tcl 14 Jun 2023 08:40:23 -0000 1.14.2.24 @@ -435,19 +435,23 @@ } } - aa_register_case -cats { - smoke production_safe - } -procs { - util::which - } xowf_exec_dependencies { - Test external command dependencies for this package. - } { - foreach cmd [list \ - [::util::which qrencode] \ - ] { - aa_true "'$cmd' is executable" [file executable $cmd] - } - } + # + # This test could be used to make sure binaries in use in the code are + # actually available to the system. + # + # aa_register_case -cats { + # smoke production_safe + # } -procs { + # util::which + # } xowf_exec_dependencies { + # Test external command dependencies for this package. + # } { + # foreach cmd [list \ + # [::util::which qrencode] \ + # ] { + # aa_true "'$cmd' is executable" [file executable $cmd] + # } + # } } Index: openacs-4/packages/xowiki/tcl/test/xowiki-admin-tests-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/test/xowiki-admin-tests-procs.tcl,v diff -u -r1.1.2.28 -r1.1.2.29 --- openacs-4/packages/xowiki/tcl/test/xowiki-admin-tests-procs.tcl 20 Apr 2023 15:21:42 -0000 1.1.2.28 +++ openacs-4/packages/xowiki/tcl/test/xowiki-admin-tests-procs.tcl 14 Jun 2023 08:40:23 -0000 1.1.2.29 @@ -6,23 +6,27 @@ } -aa_register_case -cats { - smoke production_safe -} -procs { - util::which -} xowiki_exec_dependencies { - Test external command dependencies for this package. -} { - foreach cmd [list \ - [::util::which tar] \ - [::util::which ffmpeg] \ - [::util::which convert] \ - [::util::which tidy] \ - [::util::which clamdscan] - ] { - aa_true "'$cmd' is executable" [file executable $cmd] - } -} +# +# This test could be used to make sure binaries in use in the code are +# actually available to the system. +# +# aa_register_case -cats { +# smoke production_safe +# } -procs { +# util::which +# } xowiki_exec_dependencies { +# Test external command dependencies for this package. +# } { +# foreach cmd [list \ +# [::util::which tar] \ +# [::util::which ffmpeg] \ +# [::util::which convert] \ +# [::util::which tidy] \ +# [::util::which clamdscan] +# ] { +# aa_true "'$cmd' is executable" [file executable $cmd] +# } +# } aa_register_case \ -cats {api smoke} \