diff options
| author | das <das> | 2003-02-25 16:11:22 (GMT) |
|---|---|---|
| committer | das <das> | 2003-02-25 16:11:22 (GMT) |
| commit | 01f99ad256985a7ef63f44213557cf25405f1aba (patch) | |
| tree | 3050db0d6a1a7d58a4769fae9295683257115c06 /macosx | |
| parent | 714e9689b8442750b7e9c1575386ebfd7c4a6616 (diff) | |
| download | tk-01f99ad256985a7ef63f44213557cf25405f1aba.zip tk-01f99ad256985a7ef63f44213557cf25405f1aba.tar.gz tk-01f99ad256985a7ef63f44213557cf25405f1aba.tar.bz2 | |
* macosx/tkMacOSXHLEvents.c: fixed conversion of apple event
parameters to posix style path names.
[Bug #621672] (steffen, Benjamin Riefenstahl)
Diffstat (limited to 'macosx')
| -rw-r--r-- | macosx/tkMacOSXHLEvents.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/macosx/tkMacOSXHLEvents.c b/macosx/tkMacOSXHLEvents.c index 7c7566c..65b0b6c 100644 --- a/macosx/tkMacOSXHLEvents.c +++ b/macosx/tkMacOSXHLEvents.c @@ -10,7 +10,7 @@ * See the file "license.terms" for information on usage and redistribution * of this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tkMacOSXHLEvents.c,v 1.4 2003/02/25 16:09:25 das Exp $ + * RCS: @(#) $Id: tkMacOSXHLEvents.c,v 1.5 2003/02/25 16:11:22 das Exp $ */ #include "tkMacOSXPort.h" @@ -484,7 +484,7 @@ FSRefToDString(const FSRef *fsref, Tcl_DString *ds) err = FSRefMakePath(fsref, fileName, sizeof(fileName)); if (err == noErr) { - Tcl_UtfToExternalDString(NULL, fileName, -1, ds); + Tcl_ExternalToUtfDString(NULL, fileName, -1, ds); } return err; } |