* generic/tclFilename.c (Tcl_TranslateFileName): Reinstate Mon Jun 5 18:18:32

2000 Christopher Faylor <cgf@cygnus.com> minus a typo.

diff --git a/tcl/ChangeLog b/tcl/ChangeLog
index dd50162..7777695 100644 (file)
--- a/tcl/ChangeLog
+++ b/tcl/ChangeLog
@@ -1,3 +1,8 @@
+Tue Jun  6 12:17:46 2000  Christopher Faylor <cgf@cygnus.com>
+
+       * generic/tclFilename.c (Tcl_TranslateFileName): Reinstate Mon Jun 5
+       18:18:32 2000 Christopher Faylor <cgf@cygnus.com> minus a typo.
+
 Tue Jun  6 17:05:20 2000  Andrew Cagney  <cagney@b1.cygnus.com>
 
        * generic/tclFileName.c (Tcl_TranslateFileName): Revert Mon Jun 5

diff --git a/tcl/generic/tclFileName.c b/tcl/generic/tclFileName.c
index 1b9fec0..b8fda1a 100644 (file)
--- a/tcl/generic/tclFileName.c
+++ b/tcl/generic/tclFileName.c
@@ -963,6 +963,7 @@ Tcl_TranslateFileName(interp, name, bufferPtr)
      * some system interfaces don't accept forward slashes.
      */
 
+#ifndef __CYGWIN__
     if (tclPlatform == TCL_PLATFORM_WINDOWS) {
        for (p = Tcl_DStringValue(bufferPtr); *p != '\0'; p++) {
            if (*p == '/') {
@@ -970,6 +971,7 @@ Tcl_TranslateFileName(interp, name, bufferPtr)
            }
        }
     }
+#endif
     return Tcl_DStringValue(bufferPtr);
 }
 \f