diff options
| author | drh <drh@noemail.net> | 2000-08-17 09:49:59 +0000 |
|---|---|---|
| committer | drh <drh@noemail.net> | 2000-08-17 09:49:59 +0000 |
| commit | 167a4b1c9073b10d265e190fc2fc7fd970c7b987 (patch) | |
| tree | 395c6ca0e2253ab42ca36d0e910d61c59234224d /src/tclsqlite.c | |
| parent | 30cab80923fc78a1bc916945c881b246f71f4029 (diff) | |
| download | sqlite-167a4b1c9073b10d265e190fc2fc7fd970c7b987.tar.gz sqlite-167a4b1c9073b10d265e190fc2fc7fd970c7b987.zip | |
allow readonly access when write permission denied (CVS 131)
FossilOrigin-Name: 897b4bc0e92a2c7534d4fa9453a7f8f863fce67a
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 dc9894c71..11221a769 100644 --- a/src/tclsqlite.c +++ b/src/tclsqlite.c @@ -23,7 +23,7 @@ ************************************************************************* ** A TCL Interface to SQLite ** -** $Id: tclsqlite.c,v 1.7 2000/08/04 14:56:25 drh Exp $ +** $Id: tclsqlite.c,v 1.8 2000/08/17 09:50:00 drh Exp $ */ #include "sqlite.h" #include <tcl.h> @@ -329,6 +329,7 @@ static int DbMain(void *cd, Tcl_Interp *interp, int argc, char **argv){ */ int Sqlite_Init(Tcl_Interp *interp){ Tcl_CreateCommand(interp, "sqlite", DbMain, 0, 0); + Tcl_PkgProvide(interp, "sqlite", "1.0"); return TCL_OK; } int Sqlite_SafeInit(Tcl_Interp *interp){ |