diff options
| author | dan <dan@noemail.net> | 2016-08-29 14:18:18 +0000 |
|---|---|---|
| committer | dan <dan@noemail.net> | 2016-08-29 14:18:18 +0000 |
| commit | a87070a2716fde5569db592c0cebfd7d3578f968 (patch) | |
| tree | c46dd32e70a15e0e8b4ebbdf8374f53a64026fbd /ext/session/session_common.tcl | |
| parent | 2e5c5052fd745dce7a09c7bce2c0fc97fcf04316 (diff) | |
| download | sqlite-a87070a2716fde5569db592c0cebfd7d3578f968.tar.gz sqlite-a87070a2716fde5569db592c0cebfd7d3578f968.zip | |
Use some of the example code from the sessions documenatation in the sessions test cases.
FossilOrigin-Name: 6602974d17536bcb904a794bddedffd58926794b
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'" { |