diff options
| author |   Unit 193 <unit193@unit193.net> | 2021-12-17 07:06:30 -0500 |
|---|---|---|
| committer | Unit 193 <unit193@unit193.net> | 2021-12-17 07:06:30 -0500 |
| commit | 1fdc150116cad39aae5c5da407c3312b47a59e3a (patch) | |
| tree | 123c79a4d7ad2d45781ba03ce939f7539fb428d8 /Plugins/ScriptingTcl/scriptingtcl.cpp | |
| parent | feda8a7db8d1d7c5439aa8f8feef7cc0dd2b59a0 (diff) | |
New upstream version 3.3.3+dfsg1.upstream/3.3.3+dfsg1
Diffstat (limited to 'Plugins/ScriptingTcl/scriptingtcl.cpp')
| -rw-r--r-- | Plugins/ScriptingTcl/scriptingtcl.cpp | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/Plugins/ScriptingTcl/scriptingtcl.cpp b/Plugins/ScriptingTcl/scriptingtcl.cpp index 962c073..cc48aa0 100644 --- a/Plugins/ScriptingTcl/scriptingtcl.cpp +++ b/Plugins/ScriptingTcl/scriptingtcl.cpp @@ -290,6 +290,7 @@ QVariant ScriptingTcl::tclObjToVariant(Tcl_Obj* obj) Tcl_DictObjDone(&search); } result = hash; + break; } case TclDataType::Bignum: case TclDataType::String: @@ -558,7 +559,7 @@ SqlQueryPtr ScriptingTcl::dbCommonEval(ContextTcl* ctx, Tcl_Interp* interp, Tcl_ Tcl_Obj* result = nullptr; QString sql = QString::fromUtf8(Tcl_GetStringFromObj(objv[2], nullptr)); - TokenList bindTokens = Lexer::tokenize(sql, ctx->db->getDialect()).filter(Token::BIND_PARAM); + TokenList bindTokens = Lexer::tokenize(sql).filter(Token::BIND_PARAM); QString bindVarName; QHash<QString, QVariant> queryArgs; for (const TokenPtr& token : bindTokens) |