[Eas-dev-commit] clip-ui/drivers driver-gtk.prg, 1.4, 1.5 driver-gtk2.prg, 1.3, 1.4

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

Update of /cvsroot/eas-dev/clip-ui/drivers
In directory sc8-pr-cvs5.sourceforge.net:/tmp/cvs-serv28215/drivers

Modified Files:
	driver-gtk.prg driver-gtk2.prg 
Log Message:
clip-ui-0.1.3:
- UIWindow is resizeable by default
- Widget with suffix + is expanded in XFL forms

Index: driver-gtk.prg
===================================================================
RCS file: /cvsroot/eas-dev/clip-ui/drivers/driver-gtk.prg,v
retrieving revision 1.4
retrieving revision 1.5
diff -u -d -r1.4 -r1.5
--- driver-gtk.prg	18 Oct 2006 08:49:59 -0000	1.4
+++ driver-gtk.prg	25 Oct 2006 07:46:28 -0000	1.5
@@ -220,10 +220,10 @@
 	vbox := UIVBox()
 	gtk_ContainerAdd( wnd, vbox )
 	wnd:userSpace := vbox
-	if valtype(resizeable) == "L" .and. resizeable
-		gtk_WindowSetPolicy(wnd, .T., .T., .T.)
-	else
+	if valtype(resizeable) == "L" .and. .not. resizeable
 		gtk_WindowSetPolicy(wnd, .F., .F., .T.)
+	else
+		gtk_WindowSetPolicy(wnd, .T., .T., .T.)
 	endif
 	if empty(parent)
 		gtk_SignalConnectAfter( wnd, "delete-event", @ui_quit() )

Index: driver-gtk2.prg
===================================================================
RCS file: /cvsroot/eas-dev/clip-ui/drivers/driver-gtk2.prg,v
retrieving revision 1.3
retrieving revision 1.4
diff -u -d -r1.3 -r1.4
--- driver-gtk2.prg	6 Jun 2006 07:24:02 -0000	1.3
+++ driver-gtk2.prg	25 Oct 2006 07:46:28 -0000	1.4
@@ -225,10 +225,10 @@
 	vbox := UIVBox()
 	gtk_ContainerAdd( wnd, vbox )
 	wnd:userSpace := vbox
-	if valtype(resizeable) == "L" .and. resizeable
-		gtk_WindowSetResizeable(wnd, .T.)
-	else
+	if valtype(resizeable) == "L" .and. .not. resizeable
 		gtk_WindowSetResizeable(wnd, .F.)
+	else
+		gtk_WindowSetResizeable(wnd, .T.)
 	endif
 	if empty(parent)
 		gtk_SignalConnectAfter( wnd, "delete-event", @ui_quit() )