Index: openacs-4/packages/acs-lang/tcl/test/acs-lang-test-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-lang/tcl/test/acs-lang-test-procs.tcl,v diff -u -N -r1.18.2.4 -r1.18.2.5 --- openacs-4/packages/acs-lang/tcl/test/acs-lang-test-procs.tcl 23 Feb 2017 10:37:14 -0000 1.18.2.4 +++ openacs-4/packages/acs-lang/tcl/test/acs-lang-test-procs.tcl 27 Mar 2017 10:51:27 -0000 1.18.2.5 @@ -369,7 +369,7 @@ aa_log "locale=$locale ----------3. Make changes to catalog files and do first upgrade----------" # Update the catalog file - file delete -force $catalog_file_path + file delete -force -- $catalog_file_path lang::catalog::export_to_file $catalog_file_path [array get file_messages] aa_true "First upgrade: catalog file $catalog_file_path updated" [file exists $catalog_file_path] @@ -562,12 +562,12 @@ lang::message::unregister $package_key $message_key } # Delete the catalog files - file delete $catalog_backup_file - file delete $catalog_file + file delete -- $catalog_backup_file + file delete -- $catalog_file # Delete the tcl files - file delete "$::acs::rootdir/$tcl_file" - file delete "$::acs::rootdir/$tcl_backup_file" + file delete -- $::acs::rootdir/$tcl_file + file delete -- $::acs::rootdir/$tcl_backup_file } aa_register_case \ @@ -663,7 +663,7 @@ [regexp $expected_adp_pattern $adp_contents match] # Remove the adp test file - file delete $adp_file_path + file delete -- $adp_file_path } aa_register_case \