Back out bug fix for [Bug 2893771], because it was the cause of the regression.

2 files changed, 10 insertions, 24 deletions

diff --git a/ChangeLog b/ChangeLog
index 2e3f842..2d75b52 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+2013-03-19  Jan Nijtmans  <nijtmans@users.sf.net>
+
+	* win/tclWinFile.c: [Bug 3608360]: Back out bug fix
+	for [Bug 2893771], because it was the cause of the regression.
+
 2013-03-18  Donal K. Fellows  <dkf@users.sf.net>
 
 	* tests/cmdAH.test (cmdAH-19.12): [Bug 3608360]: Added test to ensure
diff --git a/win/tclWinFile.c b/win/tclWinFile.c
index 18b05d6..989836f 100644
--- a/win/tclWinFile.c
+++ b/win/tclWinFile.c
@@ -1534,19 +1534,11 @@ NativeAccess(
 
     if (attr == INVALID_FILE_ATTRIBUTES) {
 	/*
-	 * File might not exist.
+	 * File doesn't exist.
 	 */
 
-	WIN32_FIND_DATA ffd;
-	HANDLE hFind;
-	hFind = FindFirstFile(nativePath, &ffd);
-	if (hFind != INVALID_HANDLE_VALUE) {
-	    attr = ffd.dwFileAttributes;
-	    FindClose(hFind);
-	} else {
-	    TclWinConvertError(GetLastError());
-	    return -1;
-	}
+	TclWinConvertError(GetLastError());
+	return -1;
     }
 
     if (mode == F_OK) {
@@ -2002,19 +1994,8 @@ NativeStat(
 
 	if (GetFileAttributesEx(nativePath,
 		GetFileExInfoStandard, &data) != TRUE) {
-	    /*
-	     * We might have just been denied access
-	     */
-
-	    WIN32_FIND_DATA ffd;
-	    HANDLE hFind = FindFirstFile(nativePath, &ffd);
-
-	    if (hFind == INVALID_HANDLE_VALUE) {
-		Tcl_SetErrno(ENOENT);
-		return -1;
-	    }
-	    memcpy(&data, &ffd, sizeof(data));
-	    FindClose(hFind);
+	    Tcl_SetErrno(ENOENT);
+	    return -1;
 	}
 
 	attr = data.dwFileAttributes;