diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2012-03-04 16:36:47 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2012-03-04 16:36:47 (GMT) |
| commit | b5830ef3aed89fc5af7d49820dcbeca3c5ebc65e (patch) | |
| tree | 006becc9748ec43a3806573f12d5a413e28c8114 /generic | |
| parent | 1417797aff03fc80f3d4758b27341bc4e482fc50 (diff) | |
| download | tcl-b5830ef3aed89fc5af7d49820dcbeca3c5ebc65e.zip tcl-b5830ef3aed89fc5af7d49820dcbeca3c5ebc65e.tar.gz tcl-b5830ef3aed89fc5af7d49820dcbeca3c5ebc65e.tar.bz2 | |
Patch from the cygwin folks
Diffstat (limited to 'generic')
| -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 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) |