diff options
author | drh <drh@noemail.net> | 2000-05-30 13:44:19 +0000 |
---|---|---|
committer | drh <drh@noemail.net> | 2000-05-30 13:44:19 +0000 |
commit | dcc581ccaec41ccdd564bbb814878eedc1b43372 (patch) | |
tree | dabecd394dc10ffee7c7971f8c35a7210ff06546 /src/tclsqlite.c | |
parent | 8d2cb149eae3fe25a97f5e01a0a8e904d0ff010e (diff) | |
download | sqlite-dcc581ccaec41ccdd564bbb814878eedc1b43372.tar.gz sqlite-dcc581ccaec41ccdd564bbb814878eedc1b43372.zip |
:-) (CVS 14)
FossilOrigin-Name: 1bb8ee8d9f1d3c409a11910e7552e4bb5e7f5f87
Diffstat (limited to 'src/tclsqlite.c')
-rw-r--r-- | src/tclsqlite.c | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/src/tclsqlite.c b/src/tclsqlite.c index 2d4d154eb..e261791cc 100644 --- a/src/tclsqlite.c +++ b/src/tclsqlite.c @@ -23,7 +23,7 @@ ************************************************************************* ** A TCL Interface to SQLite ** -** $Id: tclsqlite.c,v 1.2 2000/05/29 20:41:51 drh Exp $ +** $Id: tclsqlite.c,v 1.3 2000/05/30 13:44:20 drh Exp $ */ #include "sqlite.h" #include <tcl.h> @@ -152,6 +152,7 @@ static int DbCmd(void *cd, Tcl_Interp *interp, int argc, char **argv){ } if( argc==5 ){ cbData.interp = interp; + cbData.once = 1; cbData.zArray = argv[3]; cbData.zCode = argv[4]; zErrMsg = 0; |