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.10 -r1.11 --- openacs-4/packages/acs-authentication/tcl/test/sync-test-procs.tcl 16 Sep 2003 13:07:43 -0000 1.10 +++ openacs-4/packages/acs-authentication/tcl/test/sync-test-procs.tcl 17 Sep 2003 07:07:52 -0000 1.11 @@ -931,7 +931,7 @@ -contract "auth_sync_retrieve" \ -impl "HTTPGet" \ -operation "GetDocument" \ - -call_args [list [list snapshot_url {} incremental_url "[ad_url]/SYSTEM/dbtest.tcl"]]] + -call_args [list [list SnapshotURL {} IncrementalURL "[ad_url]/SYSTEM/dbtest.tcl"]]] aa_equals "result.doc_status is ok" $result(doc_status) "ok"