Index: openacs-4/packages/acs-authentication/tcl/test/sync-test-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-authentication/tcl/test/sync-test-procs.tcl,v diff -u -r1.15 -r1.16 --- openacs-4/packages/acs-authentication/tcl/test/sync-test-procs.tcl 31 Oct 2003 10:29:19 -0000 1.15 +++ openacs-4/packages/acs-authentication/tcl/test/sync-test-procs.tcl 15 Feb 2004 10:52:51 -0000 1.16 @@ -6,7 +6,9 @@ @cvs-id $Id$ } -aa_register_case sync_start_end { +aa_register_case \ + -cats {api db} \ + sync_start_end { Test batch job basics: Starting, getting document, adding entries, ending. } { aa_run_with_teardown \ @@ -80,7 +82,9 @@ } } -aa_register_case sync_actions { +aa_register_case \ + -cats {api} \ + sync_actions { Test job actions: insert, update, } { aa_run_with_teardown \ @@ -336,7 +340,9 @@ } } -aa_register_case sync_snapshot { +aa_register_case \ + -cats {api db} \ + sync_snapshot { Test a snapshot job } { aa_run_with_teardown \ @@ -479,7 +485,9 @@ } -aa_register_case sync_batch_for_local { +aa_register_case \ + -cats {api smoke} \ + sync_batch_for_local { Test a batch job for the local authority } { aa_run_with_teardown \ @@ -496,7 +504,9 @@ } -aa_register_case sync_batch_ims_example_doc { +aa_register_case \ + -cats {api} \ + sync_batch_ims_example_doc { Test IMS Enterprise 1.1 batch sync with the XML document from the specification. } { aa_stub acs_sc::invoke { @@ -679,7 +689,9 @@ } -aa_register_case sync_batch_ims_test { +aa_register_case \ + -cats {api} \ + sync_batch_ims_test { Test IMS Enterprise 1.1 batch sync with a constructed document which actually works } { aa_stub acs_sc::invoke { @@ -945,7 +957,9 @@ } } -aa_register_case sync_http_get_document { +aa_register_case \ + -cats {api smoke} \ + sync_http_get_document { Test the HTTPGet implementation of GetDocument service contract. } { array set result [acs_sc::invoke \ @@ -961,7 +975,9 @@ aa_equals "result.document is 'success'" $result(document) "success" } -aa_register_case sync_file_get_document { +aa_register_case \ + -cats {api web} \ + sync_file_get_document { Test the HTTPGet implementation of GetDocument service contract. } { set path "[acs_root_dir]/www/SYSTEM/dbtest.tcl"