Index: test/permutations.test ================================================================== --- test/permutations.test +++ test/permutations.test @@ -476,11 +476,11 @@ # Exclude stmt.test, which expects sub-journals to use temporary files. stmt.test # WAL mode is different. - walmode.test + walmode.test walfault.test wal.test wal2.test wal3.test } ifcapable mem3 { run_tests "memsys3" -description { Run tests using the allocator in mem3.c. Index: test/tester.tcl ================================================================== --- test/tester.tcl +++ test/tester.tcl @@ -100,15 +100,17 @@ } if {[sqlite_orig -has-codec]} { lappend args -key {xyzzy} } - uplevel 1 sqlite_orig $args + set res [uplevel 1 sqlite_orig $args] if {[info exists ::G(perm:presql)]} { [lindex $args 0] eval $::G(perm:presql) } + + set res } else { # This command is not opening a new database connection. Pass the # arguments through to the C implemenation as the are. # uplevel 1 sqlite_orig $args