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 -r1.10 --- openacs-4/packages/acs-content-repository/tcl/test/acs-content-repository-procs.tcl 20 Jul 2018 09:00:33 -0000 1.9 +++ openacs-4/packages/acs-content-repository/tcl/test/acs-content-repository-procs.tcl 3 Sep 2024 15:37:31 -0000 1.10 @@ -6,6 +6,26 @@ @cvs-id $Id$ } +# +# 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} \ -procs { @@ -16,7 +36,7 @@ } \ acs_content_repository_trivial_smoke_test { Minimal smoke test. -} { +} { aa_run_with_teardown \ -rollback \ @@ -46,7 +66,7 @@ # teardown doesn't seem to eliminate this: set delete_result [content::keyword::delete -keyword_id $new_keyword_id] - # would test that delete works but there's no relevant function in the API + # would test that delete works but there's no relevant function in the API } }