[tekui-devel] tekui: WinWidth, WinHeight, WinLeft, WinTop renamed to Width, He...

[Timm S. Mueller]

details:   http://hg.teklib.org/tekui/rev/cc5fd381ee31
changeset: 479:cc5fd381ee31
user:      Timm S. Mueller <tmueller at neoscientists.org>
date:      Sat May 10 17:43:43 2008 +0200
description:
WinWidth, WinHeight, WinLeft, WinTop renamed to Width, Height, Left, Top;
ListView: missing initialization of "SelectLine"; setState() for menu-style
hiliting now takes place in MenuItem instead of PopItem; TextInput: missing
initialization of "Enter"; Window:getWindowDimensions() cleaned up, merged
with former Width/Height attributes

diffs (truncated from 315 to 100 lines):

diff -r a055b18284eb -r cc5fd381ee31 bin/demo.lua
--- a/bin/demo.lua	Fri May 09 14:24:43 2008 +0200
+++ b/bin/demo.lua	Sat May 10 17:43:43 2008 +0200
@@ -71,6 +71,8 @@ ui.Application:new
 
 		ui.Window:new
 		{
+			Width = 300,
+			Height = 300,
 			Id = "anims-window",
 			Title = "Animations",
 			Status = "hide",
diff -r a055b18284eb -r cc5fd381ee31 bin/filereq.lua
--- a/bin/filereq.lua	Fri May 09 14:24:43 2008 +0200
+++ b/bin/filereq.lua	Sat May 10 17:43:43 2008 +0200
@@ -11,8 +11,8 @@ ui.Application:new
 		{
 			Title = "File requester",
 			Direction = "vertical",
-			WinWidth = 400,
-			WinHeight = 500,
+			Width = 400,
+			Height = 500,
 			Children =
 			{
 				ui.Group:new
diff -r a055b18284eb -r cc5fd381ee31 tek/class/ui/drawable.lua
--- a/tek/class/ui/drawable.lua	Fri May 09 14:24:43 2008 +0200
+++ b/tek/class/ui/drawable.lua	Sat May 10 17:43:43 2008 +0200
@@ -19,7 +19,7 @@ local HUGE = ui.HUGE
 local HUGE = ui.HUGE
 
 module("tek.class.ui.drawable", tek.class.ui.object)
-_VERSION = "Drawable 3.6"
+_VERSION = "Drawable 3.7"
 
 -------------------------------------------------------------------------------
 -- Class implementation:
@@ -31,10 +31,10 @@ function Drawable.init(self)
 	assert(self.Display)
 	self.Visual = false
 	self.Pens = { }
-	self.WinLeft = false
-	self.WinTop = false
-	self.WinWidth = false
-	self.WinHeight = false
+	self.Left = false
+	self.Top = false
+	self.Width = false
+	self.Height = false
 	self.AspectX = 1
 	self.AspectY = 1
 	self.ShiftX = 0
@@ -139,9 +139,9 @@ end
 end
 
 function Drawable:getAttrs()
-	self.WinWidth, self.WinHeight, self.WinLeft, self.WinTop =
+	self.Width, self.Height, self.Left, self.Top =
 		self.Visual:getattrs()
-	return self.WinWidth, self.WinHeight, self.WinLeft, self.WinTop
+	return self.Width, self.Height, self.Left, self.Top
 end
 
 function Drawable:pushClipRect(x0, y0, x1, y1)
diff -r a055b18284eb -r cc5fd381ee31 tek/class/ui/group.lua
--- a/tek/class/ui/group.lua	Fri May 09 14:24:43 2008 +0200
+++ b/tek/class/ui/group.lua	Sat May 10 17:43:43 2008 +0200
@@ -17,7 +17,7 @@ local type = type
 local type = type
 
 module("tek.class.ui.group", tek.class.ui.gadget)
-_VERSION = "Group 6.9"
+_VERSION = "Group 6.10"
 local Group = _M
 
 -------------------------------------------------------------------------------
@@ -173,16 +173,6 @@ function Group.newTabGroup(class, self)
 	-- enclose the degraded object in an object of its former class:
 	return class:new
 	{
-		Direction = "vertical",
-		Legend = legend,
-		TabName = self.TabName,
-		MaxWidth = self.MaxWidth,
-		MaxHeight = self.MaxHeight,
-		HAlign = self.HAlign,
-		VAlign = self.VAlign,
-		Status = self.Status,
-		Id = id,
-		Title = self.Title,
 		Children =
 		{
 			Group:newRegularGroup
@@ -197,9 +187,26 @@ function Group.newTabGroup(class, self)
 			-- wrapped object:
 			self,
 		},
-		-- propagation of attributes to the encapsulated class:
+		Direction = "vertical",