diff options
| author | drh <drh@noemail.net> | 2008-09-23 10:12:13 +0000 |
|---|---|---|
| committer | drh <drh@noemail.net> | 2008-09-23 10:12:13 +0000 |
| commit | 3e59c01255793616a636184cac57f2c6594cde74 (patch) | |
| tree | 3ba7a8e19d153e7cda59147b6d6ac478d64fe880 /src | |
| parent | e2c3a659a9aef330e56fd0409d681816727ef95e (diff) | |
| download | sqlite-3e59c01255793616a636184cac57f2c6594cde74.tar.gz sqlite-3e59c01255793616a636184cac57f2c6594cde74.zip | |
Fix the TCL installer so that it omits the release number. Ticket #3396.
Use strcmp() instead of sqlite3StrICmp() in the "copy" method of the SQLite
object in the TCL interface. (CVS 5735)
FossilOrigin-Name: a88606245760eaf8054d67773db7d8b795e8ca25
Diffstat (limited to 'src')
| -rw-r--r-- | src/tclsqlite.c | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/src/tclsqlite.c b/src/tclsqlite.c index 42db88687..03f45b543 100644 --- a/src/tclsqlite.c +++ b/src/tclsqlite.c @@ -12,7 +12,7 @@ ** A TCL Interface to SQLite. Append this file to sqlite3.c and ** compile the whole thing to build a TCL-enabled version of SQLite. ** -** $Id: tclsqlite.c,v 1.225 2008/09/23 09:58:47 drh Exp $ +** $Id: tclsqlite.c,v 1.226 2008/09/23 10:12:15 drh Exp $ */ #include "tcl.h" #include <errno.h> @@ -1343,11 +1343,11 @@ static int DbObjCmd(void *cd, Tcl_Interp *interp, int objc,Tcl_Obj *const*objv){ Tcl_AppendResult(interp,"Error: non-null separator required for copy",0); return TCL_ERROR; } - if(sqlite3StrICmp(zConflict, "rollback") != 0 && - sqlite3StrICmp(zConflict, "abort" ) != 0 && - sqlite3StrICmp(zConflict, "fail" ) != 0 && - sqlite3StrICmp(zConflict, "ignore" ) != 0 && - sqlite3StrICmp(zConflict, "replace" ) != 0 ) { + if(strcmp(zConflict, "rollback") != 0 && + strcmp(zConflict, "abort" ) != 0 && + strcmp(zConflict, "fail" ) != 0 && + strcmp(zConflict, "ignore" ) != 0 && + strcmp(zConflict, "replace" ) != 0 ) { Tcl_AppendResult(interp, "Error: \"", zConflict, "\", conflict-algorithm must be one of: rollback, " "abort, fail, ignore, or replace", 0); |