[darwinbuild-changes] [106] trunk/darwinxref/DBTclPlugin.c

[source_changes at macosforge.org]

Revision: 106
          http://trac.macosforge.org/projects/darwinbuild/changeset/106
Author:   kevin
Date:     2006-10-04 01:46:17 -0700 (Wed, 04 Oct 2006)

Log Message:
-----------
- Panther: don't print carriage returns on stdout from Tcl plugins

Modified Paths:
--------------
    trunk/darwinxref/DBTclPlugin.c

Modified: trunk/darwinxref/DBTclPlugin.c
===================================================================
--- trunk/darwinxref/DBTclPlugin.c	2005-07-28 01:18:45 UTC (rev 105)
+++ trunk/darwinxref/DBTclPlugin.c	2006-10-04 08:46:17 UTC (rev 106)
@@ -314,6 +314,7 @@
 	Tcl_Obj* varname = tcl_cfstr(CFSTR("__args__"));
 	Tcl_ObjSetVar2(plugin->interp, varname, NULL, tcl_args, TCL_GLOBAL_ONLY);
 	int exitCode = -1;
+	(void)Tcl_Eval(plugin->interp, "fconfigure stdout -translation lf");
 	if (Tcl_Eval(plugin->interp, "eval run ${__args__}") == TCL_OK) {
 		Tcl_Obj* result = Tcl_GetObjResult(plugin->interp);
 		if (Tcl_GetCharLength(result) == 0) {

-------------- next part --------------
An HTML attachment was scrubbed...
URL: http://lists.macosforge.org/pipermail/darwinbuild-changes/attachments/20061004/4205b505/attachment.html