diff options
Diffstat (limited to 'src')
| -rw-r--r-- | src/tclsqlite.c | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/src/tclsqlite.c b/src/tclsqlite.c index 85126f455..d56422377 100644 --- a/src/tclsqlite.c +++ b/src/tclsqlite.c @@ -2897,8 +2897,7 @@ static int DbMain(void *cd, Tcl_Interp *interp, int objc,Tcl_Obj *const*objv){ if( strcmp(zArg,"-key")==0 ){ pKey = Tcl_GetByteArrayFromObj(objv[i+1], &nKey); }else if( strcmp(zArg, "-vfs")==0 ){ - i++; - zVfs = Tcl_GetString(objv[i]); + zVfs = Tcl_GetString(objv[i+1]); }else if( strcmp(zArg, "-readonly")==0 ){ int b; if( Tcl_GetBooleanFromObj(interp, objv[i+1], &b) ) return TCL_ERROR; |