diff options
Diffstat (limited to 'ext/session/session_common.tcl')
| -rw-r--r-- | ext/session/session_common.tcl | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/ext/session/session_common.tcl b/ext/session/session_common.tcl index 38eebec0a..06b05509b 100644 --- a/ext/session/session_common.tcl +++ b/ext/session/session_common.tcl @@ -75,6 +75,9 @@ proc do_common_sql {sql} { } proc changeset_from_sql {sql {dbname main}} { + if {$dbname == "main"} { + return [sql_exec_changeset db $sql] + } set rc [catch { sqlite3session S db $dbname db eval "SELECT name FROM $dbname.sqlite_master WHERE type = 'table'" { |