summaryrefslogtreecommitdiffstats
path: root/macosx/tkMacOSXHLEvents.c
diff options
context:
space:
mode:
authorwolfsuit <wolfsuit>2004-02-16 00:42:33 (GMT)
committerwolfsuit <wolfsuit>2004-02-16 00:42:33 (GMT)
commitbd2e07339a6724dce174ffd6cbd6b66677db3f2f (patch)
tree12bebf3e6d48b35ab147bf17d2c87861606f8460 /macosx/tkMacOSXHLEvents.c
parentda1ae8f179cd0cef93eef9f5ff61ea47d54340af (diff)
downloadtk-bd2e07339a6724dce174ffd6cbd6b66677db3f2f.zip
tk-bd2e07339a6724dce174ffd6cbd6b66677db3f2f.tar.gz
tk-bd2e07339a6724dce174ffd6cbd6b66677db3f2f.tar.bz2
Backport Mac OS X specific fixes from TOT. See ChangeLog for details.
In tk_getOpenFile filters, handle the case where you have a Macintosh file type and the files have no filetype. Fix various formatting nits.
Diffstat (limited to 'macosx/tkMacOSXHLEvents.c')
-rw-r--r--macosx/tkMacOSXHLEvents.c7
1 files changed, 4 insertions, 3 deletions
diff --git a/macosx/tkMacOSXHLEvents.c b/macosx/tkMacOSXHLEvents.c
index ac167f2..47907fd 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.5.2.1 2003/05/13 02:42:57 das Exp $
+ * RCS: @(#) $Id: tkMacOSXHLEvents.c,v 1.5.2.2 2004/02/16 00:42:34 wolfsuit Exp $
*/
#include "tkMacOSXPort.h"
@@ -329,10 +329,11 @@ ScriptHandler (const AppleEvent * event, AppleEvent * reply, long handlerRefcon)
else {
AEGetDescData(&theDesc,data,size);
data [ size ] = 0;
- for (i=0; i<size; i++)
+ for (i = 0; i < size; i++)
if (data[i] == '\r')
data[i] = '\n';
- AEReplaceDescData(theDesc.descriptorType,data,size+1,&theDesc);
+ AEReplaceDescData(theDesc.descriptorType, data,
+ size + 1, &theDesc);
}
Tcl_ExternalToUtfDString(NULL, data, size,
&encodedText);