Replace the missed 'file copy' in malloc_common.tcl with copy_file.

FossilOrigin-Name: cd20b4ef6020c0cffe918362afc2b491fb95eb92
2011-08-02 20:03:36 +00:00
parent 6c486cbce2
commit 5ea4298c81
3 changed files with 9 additions and 9 deletions
@@ -425,7 +425,7 @@ proc do_malloc_test {tn args} {
        forcedelete test2.db-journal
        forcedelete test2.db-wal
        if {[info exists ::mallocopts(-testdb)]} {
-          file copy $::mallocopts(-testdb) test.db
+          copy_file $::mallocopts(-testdb) test.db
        }
        catch { sqlite3 db test.db }
        if {[info commands db] ne ""} {