* Made consistent with Tcl7.0 and Tk3.3

1 files changed, 12 insertions, 4 deletions

diff --git a/comm/TkMultiplexer.cc b/comm/TkMultiplexer.cc
index 3272851..28c76d3 100644
--- a/comm/TkMultiplexer.cc
+++ b/comm/TkMultiplexer.cc
@@ -14,7 +14,15 @@
  */
 
 #include "TkMultiplexer.h"
-#include "error.h"
+
+/* these files are included by tk.h, I include them here to avoid
+    them being enclosed in extern "C" */
+#include <X11/Xlib.h>
+#include <stddef.h>
+#include <stdio.h>
+extern "C" {
+#include "tk.h"
+}
 
 #include <memory.h>
 
@@ -67,7 +75,7 @@ UchTkMultiplexer :: SetMasks (int fd, IOMODE mode)
 	if (mask) {
 		Tk_CreateFileHandler (fd, mask, ioHandler, (ClientData) ch);
 		ReadCount++;
-		Active [fd] = TRUE;
+		Active [fd] = true;
 	}
 }
 
@@ -105,12 +113,12 @@ UchTkMultiplexer :: AddSignalHook ()
 MPX_RES
 UchTkMultiplexer :: Loop ()
 {
-	Looping = TRUE;
+	Looping = true;
 
 	Tk_MainLoop ();
 
 	if (Looping) {
-		Looping = FALSE;
+		Looping = false;
 		return isMpxEmpty;
 	}
 	return isMpxTerminated;