[Eas-dev-commit] eas/libeas Makefile, 1.2, 1.3 messagemanager.prg, 1.3, 1.4 protocol_raw.prg, 1.5, 1.6 transportmanager.prg, 1.4, 1.5 uimanager.prg, 1.5, 1.6

[Andrey C. <sku...@us...>]

Update of /cvsroot/eas-dev/eas/libeas
In directory sc8-pr-cvs5.sourceforge.net:/tmp/cvs-serv9766/libeas

Modified Files:
	Makefile messagemanager.prg protocol_raw.prg 
	transportmanager.prg uimanager.prg 
Log Message:
check glibc version for build with or without thread support

Index: Makefile
===================================================================
RCS file: /cvsroot/eas-dev/eas/libeas/Makefile,v
retrieving revision 1.2
retrieving revision 1.3
diff -u -d -r1.2 -r1.3
--- Makefile	20 Nov 2006 12:57:55 -0000	1.2
+++ Makefile	16 Jan 2007 14:23:25 -0000	1.3
@@ -42,4 +42,4 @@
 dist: distclean
 
 .prg.o: clip-ui.ch
-	$(CLIP) $(CLIPFLAGS) $(CLIPINCLUDE) $(EASDEF) $<
+	$(CLIP) $(CLIPFLAGS)$(THREAD) $(CLIPINCLUDE) $(EASDEF) $<

Index: messagemanager.prg
===================================================================
RCS file: /cvsroot/eas-dev/eas/libeas/messagemanager.prg,v
retrieving revision 1.3
retrieving revision 1.4
diff -u -d -r1.3 -r1.4
--- messagemanager.prg	15 Nov 2006 10:37:18 -0000	1.3
+++ messagemanager.prg	16 Jan 2007 14:23:25 -0000	1.4
@@ -118,8 +118,10 @@
 			ret := map()
 			ret:error := self:exec:lastError
 			
-			// Pass error to administrator
-			lcomponent( "errorlog", "add", "error", ret:error )
+			if ret:error != "Method 'add' of component 'errorlog' was not found"
+				// Pass error to administrator
+				lcomponent( "errorlog", "add", "error", ret:error )
+			endif
 			
 		endif
 		

Index: protocol_raw.prg
===================================================================
RCS file: /cvsroot/eas-dev/eas/libeas/protocol_raw.prg,v
retrieving revision 1.5
retrieving revision 1.6
diff -u -d -r1.5 -r1.6
--- protocol_raw.prg	15 Nov 2006 10:37:18 -0000	1.5
+++ protocol_raw.prg	16 Jan 2007 14:23:25 -0000	1.6
@@ -114,7 +114,11 @@
 			if (session := tcpAccept( self:socket:handle, self:socket:aTimeOut )) != -1
 				// Create new session
 				eDebug( 26, "Start new session: ", session)
+#ifdef SINGLE_CONNECTION
+				threadId := session_open(self, session) 		  // Begin session
+#else
 				threadId := start(@session_open(), self, session) // Begin new thread
+#endif
 				eDebug( 26, "Ready for new connection")
 			endif
 			sleep(0.01)

Index: transportmanager.prg
===================================================================
RCS file: /cvsroot/eas-dev/eas/libeas/transportmanager.prg,v
retrieving revision 1.4
retrieving revision 1.5
diff -u -d -r1.4 -r1.5
--- transportmanager.prg	20 Nov 2006 12:57:55 -0000	1.4
+++ transportmanager.prg	16 Jan 2007 14:23:25 -0000	1.5
@@ -119,7 +119,11 @@
 			// Open each connection
 			for c in self:connections
 				oCurConn := c
+#ifdef SINGLE_CONNECTION
+				threadId := connection_open()  			// Begin connection
+#else
 				threadId := start( @connection_open() ) // Begin thread for each connection
+#endif
 			next
 	
 			// Infinity loop for child thread

Index: uimanager.prg
===================================================================
RCS file: /cvsroot/eas-dev/eas/libeas/uimanager.prg,v
retrieving revision 1.5
retrieving revision 1.6
diff -u -d -r1.5 -r1.6
--- uimanager.prg	20 Nov 2006 12:57:55 -0000	1.5
+++ uimanager.prg	16 Jan 2007 14:23:25 -0000	1.6
@@ -320,7 +320,7 @@
 		return NIL
 	endif
 
-	if params:window:isChanged() // TODO: i18n is needed!
+	if params:window:isChanged()
 		dlg := params:window:dialogBox(i18n("Document was changed"), ;
 		i18n("There are unsaved changes in current document.&\nSave changes?"), ;
 		i18n("'&amp;Save','&amp;Discard','&amp;Cancel'"), ;