diff options
| author | drh <> | 2024-11-22 17:41:00 +0000 |
|---|---|---|
| committer | drh <> | 2024-11-22 17:41:00 +0000 |
| commit | 8ff67df7ac451fe0e8e42b5088aa866fc20f5ebf (patch) | |
| tree | 7127d1855a1b55cf5cfe50070ac7ab2955ce1954 /src/tclsqlite.c | |
| parent | 7398e279a711a1fea3ca4db08a02e8b421304f7c (diff) | |
| download | sqlite-8ff67df7ac451fe0e8e42b5088aa866fc20f5ebf.tar.gz sqlite-8ff67df7ac451fe0e8e42b5088aa866fc20f5ebf.zip | |
Fix another issue in argument expansion on Windows for tclsqlite3.c in
interpreter mode. Problem introduced by check-in [9b87ea219bce5689] and
unfixed by [cd942dce148c9d8f].
FossilOrigin-Name: 0fe1622cec95b7ebecc127ee57a08113d3da1dadbe72c03a13d6751b3043e50f
Diffstat (limited to 'src/tclsqlite.c')
| -rw-r--r-- | src/tclsqlite.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/tclsqlite.c b/src/tclsqlite.c index 36459e4a9..4406ceef6 100644 --- a/src/tclsqlite.c +++ b/src/tclsqlite.c @@ -4034,7 +4034,7 @@ static const char *tclsh_main_loop(void){ #ifdef WIN32 "set new [list]\n" "foreach arg $argv {\n" - "if {[file exists $arg]} {\n" + "if {[string match -* $arg] || [file exists $arg]} {\n" "lappend new $arg\n" "} else {\n" "set once 0\n" |