diff options
author | jan.nijtmans <jan.nijtmans@noemail.net> | 2012-03-04 16:39:48 (GMT) |
---|---|---|
committer | jan.nijtmans <jan.nijtmans@noemail.net> | 2012-03-04 16:39:48 (GMT) |
commit | 50b2868e84c072cf30e3a3200835f72ff583fc5d (patch) | |
tree | e40bc3bcd27564c210916245866b4881d50cf89e /generic/tclLoad.c | |
parent | 2f15356cc4b574cf80f7d7bef8d9002b7239cd43 (diff) | |
parent | 8da60d747906312c7003ef479fe7382231277802 (diff) | |
download | tcl-50b2868e84c072cf30e3a3200835f72ff583fc5d.zip tcl-50b2868e84c072cf30e3a3200835f72ff583fc5d.tar.gz tcl-50b2868e84c072cf30e3a3200835f72ff583fc5d.tar.bz2 |
Patch from the cygwin folks
FossilOrigin-Name: 09cd534bb6f0dea416e6fe28123dd6c68aaeeba5
Diffstat (limited to 'generic/tclLoad.c')
-rw-r--r-- | generic/tclLoad.c | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/generic/tclLoad.c b/generic/tclLoad.c index 820707e..202e66a 100644 --- a/generic/tclLoad.c +++ b/generic/tclLoad.c @@ -305,6 +305,12 @@ Tcl_LoadObjCmd( && (pkgGuess[2] == 'b')) { pkgGuess += 3; } +#ifdef __CYGWIN__ + if ((pkgGuess[0] == 'c') && (pkgGuess[1] == 'y') + && (pkgGuess[2] == 'g')) { + pkgGuess += 3; + } +#endif /* __CYGWIN__ */ for (p = pkgGuess; *p != 0; p += offset) { offset = Tcl_UtfToUniChar(p, &ch); if ((ch > 0x100) |