summaryrefslogtreecommitdiffstats
path: root/win
diff options
context:
space:
mode:
Diffstat (limited to 'win')
-rw-r--r--win/README.binary8
-rw-r--r--win/makefile.vc2
-rw-r--r--win/stub16.c2
-rw-r--r--win/tclWinFCmd.c2
-rw-r--r--win/tclWinFile.c7
-rw-r--r--win/tclWinSerial.c2
6 files changed, 11 insertions, 12 deletions
diff --git a/win/README.binary b/win/README.binary
index 1112ef1..8a181f3 100644
--- a/win/README.binary
+++ b/win/README.binary
@@ -1,14 +1,14 @@
-Tcl/Tk 8.1b3 for Windows, Binary Distribution
+Tcl/Tk 8.1 for Windows, Binary Distribution
-RCS: @(#) $Id: README.binary,v 1.4 1999/04/16 00:48:06 stanton Exp $
+RCS: @(#) $Id: README.binary,v 1.5 1999/04/21 21:50:33 rjohnson Exp $
1. Introduction
---------------
-This directory contains the binary distribution of Tcl/Tk 8.1b3 for
+This directory contains the binary distribution of Tcl/Tk 8.1.0 for
Windows. It was compiled with Microsoft Visual C++ 5.0 using Win32
API, so that it will run under Windows NT and Windows 95. The
-information here corresponds to the second beta release of 8.1.
+information here corresponds to the first release of 8.1.
2. Documentation
----------------
diff --git a/win/makefile.vc b/win/makefile.vc
index 984fa5a..bd3dec9 100644
--- a/win/makefile.vc
+++ b/win/makefile.vc
@@ -6,7 +6,7 @@
# Copyright (c) 1995-1996 Sun Microsystems, Inc.
# Copyright (c) 1998-1999 by Scriptics Corporation.
#
-# RCS: @(#) $Id: makefile.vc,v 1.29 1999/04/21 18:16:46 surles Exp $
+# RCS: @(#) $Id: makefile.vc,v 1.30 1999/04/21 21:50:33 rjohnson Exp $
# Does not depend on the presence of any environment variables in
# order to compile tcl; all needed information is derived from
diff --git a/win/stub16.c b/win/stub16.c
index b4d53ef..7114d4e 100644
--- a/win/stub16.c
+++ b/win/stub16.c
@@ -9,7 +9,7 @@
* See the file "license.terms" for information on usage and redistribution
* of this file, and for a DISCLAIMER OF ALL WARRANTIES.
*
- * RCS: @(#) $Id: stub16.c,v 1.3 1999/04/21 20:10:09 redman Exp $
+ * RCS: @(#) $Id: stub16.c,v 1.4 1999/04/21 21:50:34 rjohnson Exp $
*/
#define STRICT
diff --git a/win/tclWinFCmd.c b/win/tclWinFCmd.c
index d7d990e..c4e25ae 100644
--- a/win/tclWinFCmd.c
+++ b/win/tclWinFCmd.c
@@ -9,7 +9,7 @@
* See the file "license.terms" for information on usage and redistribution
* of this file, and for a DISCLAIMER OF ALL WARRANTIES.
*
- * RCS: @(#) $Id: tclWinFCmd.c,v 1.4 1999/04/21 20:09:17 redman Exp $
+ * RCS: @(#) $Id: tclWinFCmd.c,v 1.5 1999/04/21 21:50:34 rjohnson Exp $
*/
#include "tclWinInt.h"
diff --git a/win/tclWinFile.c b/win/tclWinFile.c
index e7dce3f..3a04a46 100644
--- a/win/tclWinFile.c
+++ b/win/tclWinFile.c
@@ -11,7 +11,7 @@
* See the file "license.terms" for information on usage and redistribution
* of this file, and for a DISCLAIMER OF ALL WARRANTIES.
*
- * RCS: @(#) $Id: tclWinFile.c,v 1.5 1999/04/16 00:48:08 stanton Exp $
+ * RCS: @(#) $Id: tclWinFile.c,v 1.6 1999/04/21 21:50:34 rjohnson Exp $
*/
#include "tclWinInt.h"
@@ -224,9 +224,7 @@ TclpMatchFiles(interp, separators, dirPtr, pattern, tail)
Tcl_DStringInit(&patternString);
newPattern = Tcl_DStringAppend(&patternString, pattern, tail - pattern);
- if ((volFlags & FS_CASE_SENSITIVE) == 0) {
- Tcl_UtfToLower(newPattern);
- }
+ Tcl_UtfToLower(newPattern);
/*
* We need to check all files in the directory, so append a *.*
@@ -306,6 +304,7 @@ TclpMatchFiles(interp, separators, dirPtr, pattern, tail)
nativeMatchResult = nativeName;
}
Tcl_DStringFree(&ds);
+
if (nativeMatchResult == NULL) {
continue;
}
diff --git a/win/tclWinSerial.c b/win/tclWinSerial.c
index a96f908..35bc13c 100644
--- a/win/tclWinSerial.c
+++ b/win/tclWinSerial.c
@@ -9,7 +9,7 @@
* See the file "license.terms" for information on usage and redistribution
* of this file, and for a DISCLAIMER OF ALL WARRANTIES.
*
- * RCS: @(#) $Id: tclWinSerial.c,v 1.3 1999/04/21 20:08:17 redman Exp $
+ * RCS: @(#) $Id: tclWinSerial.c,v 1.4 1999/04/21 21:50:34 rjohnson Exp $
*/
#include "tclWinInt.h"