Index: src/tclsqlite.c
==================================================================
--- src/tclsqlite.c
+++ src/tclsqlite.c
@@ -3017,12 +3017,14 @@
 */
 int Sqlite3_Init(Tcl_Interp *interp){
   Tcl_InitStubs(interp, "8.4", 0);
   Tcl_CreateObjCommand(interp, "sqlite3", (Tcl_ObjCmdProc*)DbMain, 0, 0);
   Tcl_PkgProvide(interp, "sqlite3", PACKAGE_VERSION);
+#if 0
   Tcl_CreateObjCommand(interp, "sqlite", (Tcl_ObjCmdProc*)DbMain, 0, 0);
   Tcl_PkgProvide(interp, "sqlite", PACKAGE_VERSION);
+#endif
   return TCL_OK;
 }
 int Tclsqlite3_Init(Tcl_Interp *interp){ return Sqlite3_Init(interp); }
 int Sqlite3_SafeInit(Tcl_Interp *interp){ return TCL_OK; }
 int Tclsqlite3_SafeInit(Tcl_Interp *interp){ return TCL_OK; }

Index: test/exclusive.test
==================================================================
--- test/exclusive.test
+++ test/exclusive.test
@@ -394,11 +394,11 @@
 
 # Close and reopen the database so that the temp database is no
 # longer active.
 #
 db close
-sqlite db test.db
+sqlite3 db test.db
 
 # if we're using proxy locks, we use 3 filedescriptors for a db
 # that is open but NOT writing changes, normally
 # sqlite uses 1 (proxy locking adds the conch and the local lock)
 set using_proxy 0

Index: test/tkt1667.test
==================================================================
--- test/tkt1667.test
+++ test/tkt1667.test
@@ -32,11 +32,11 @@
 # size of 1024).
 
 set first_ptrmap_page   [expr 1024/5 + 3]
 sqlite3_test_control_pending_byte [expr 1024 * ($first_ptrmap_page-1)]
 
-sqlite db test.db
+sqlite3 db test.db
 
 do_test tkt1667-1 {
   execsql {
     PRAGMA auto_vacuum = 1;
     BEGIN;