Fix the shells so that they always enable the codec if it is available,
even if no key is supplied. (CVS 1226)
FossilOrigin-Name: 95989717e17d52b2306374f5cf7613c3bd4e7801
diff --git a/src/tclsqlite.c b/src/tclsqlite.c
index 39f3514..1857d50 100644
--- a/src/tclsqlite.c
+++ b/src/tclsqlite.c
@@ -11,7 +11,7 @@
*************************************************************************
** A TCL Interface to SQLite
**
-** $Id: tclsqlite.c,v 1.56 2004/02/11 02:18:07 drh Exp $
+** $Id: tclsqlite.c,v 1.57 2004/02/11 10:37:23 drh Exp $
*/
#ifndef NO_TCL /* Omit this whole file if TCL is unavailable */
@@ -1064,11 +1064,10 @@
memset(p, 0, sizeof(*p));
zFile = Tcl_GetStringFromObj(objv[2], 0);
#ifdef SQLITE_HAS_CODEC
- if( nKey>0 ){
- p->db = sqlite_open_encrypted(zFile, pKey, nKey, &zErrMsg);
- }else
-#endif
+ p->db = sqlite_open_encrypted(zFile, pKey, nKey, &zErrMsg);
+#else
p->db = sqlite_open(zFile, mode, &zErrMsg);
+#endif
if( p->db==0 ){
Tcl_SetResult(interp, zErrMsg, TCL_VOLATILE);
Tcl_Free((char*)p);