summaryrefslogtreecommitdiffstats
path: root/generic
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2012-03-04 16:36:47 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2012-03-04 16:36:47 (GMT)
commitb5830ef3aed89fc5af7d49820dcbeca3c5ebc65e (patch)
tree006becc9748ec43a3806573f12d5a413e28c8114 /generic
parent1417797aff03fc80f3d4758b27341bc4e482fc50 (diff)
downloadtcl-b5830ef3aed89fc5af7d49820dcbeca3c5ebc65e.zip
tcl-b5830ef3aed89fc5af7d49820dcbeca3c5ebc65e.tar.gz
tcl-b5830ef3aed89fc5af7d49820dcbeca3c5ebc65e.tar.bz2
Patch from the cygwin folks
Diffstat (limited to 'generic')
-rw-r--r--generic/tclLoad.c6
1 files changed, 6 insertions, 0 deletions
diff --git a/generic/tclLoad.c b/generic/tclLoad.c
index b576daf..0caa28b 100644
--- a/generic/tclLoad.c
+++ b/generic/tclLoad.c
@@ -290,6 +290,12 @@ Tcl_LoadObjCmd(dummy, interp, objc, objv)
&& (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)