diff options
Diffstat (limited to 'ext/session/session_common.tcl')
-rw-r--r-- | ext/session/session_common.tcl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/ext/session/session_common.tcl b/ext/session/session_common.tcl index ceffdad4b..c52ac457c 100644 --- a/ext/session/session_common.tcl +++ b/ext/session/session_common.tcl @@ -172,8 +172,8 @@ proc compare_db {db1 db2} { set data1 [$db1 eval $sql] set data2 [$db2 eval $sql] if {$data1 != $data2} { - puts "$data1" - puts "$data2" + puts "$db1: $data1" + puts "$db2: $data2" error "table $tbl data mismatch" } } |