better

git-svn-id: http://svn.net-core.org/repos/t-engine4@3539 51575b47-30f0-44d4-a5cc-537603b46e54

game/engines/default/engine/ui/List.lua

@@ -100,6 +100,8 @@ function _M:generate()
 		end,
 	}
 	self.key:addCommands{
+		[{"_UP","ctrl"}] = function() self.key:triggerVirtual("MOVE_UP") end,
+		[{"_DOWN","ctrl"}] = function() self.key:triggerVirtual("MOVE_DOWN") end,
 		_HOME = function()
 			if self.sel and self.list[self.sel] then self.list[self.sel].focus_decay = self.focus_decay_max end
 			self.sel = 1

game/engines/default/engine/ui/ListColumns.lua

@@ -196,6 +196,8 @@ function _M:generate()
 		end,
 	}
 	self.key:addCommands{
+		[{"_UP","ctrl"}] = function() self.key:triggerVirtual("MOVE_UP") end,
+		[{"_DOWN","ctrl"}] = function() self.key:triggerVirtual("MOVE_DOWN") end,
 		_HOME = function()
 			if self.sel and self.list[self.sel] then self.list[self.sel].focus_decay = self.focus_decay_max end
 			self.sel = 1

game/engines/default/engine/ui/TreeList.lua

@@ -218,6 +218,8 @@ function _M:generate()
 		}
 	end
 	self.key:addCommands{
+		[{"_UP","ctrl"}] = function() self.key:triggerVirtual("MOVE_UP") end,
+		[{"_DOWN","ctrl"}] = function() self.key:triggerVirtual("MOVE_DOWN") end,
 		_HOME = function()
 			if self.sel and self.list[self.sel] then self.list[self.sel].focus_decay = self.focus_decay_max end
 			self.sel = 1