From d3292740ecb5d69669f1c21df74863ef9bd99bd3 Mon Sep 17 00:00:00 2001
From: Qingping Hou <dave2008713@gmail.com>
Date: Sun, 30 Dec 2012 22:57:23 -0500
Subject: [PATCH] adapt ReaderPanning to new touch event system

---
 frontend/ui/reader/readerpanning.lua | 29 ++++++++++++++++++++--------
 1 file changed, 21 insertions(+), 8 deletions(-)

diff --git a/frontend/ui/reader/readerpanning.lua b/frontend/ui/reader/readerpanning.lua
index 3090a2927..740635dc0 100644
--- a/frontend/ui/reader/readerpanning.lua
+++ b/frontend/ui/reader/readerpanning.lua
@@ -1,12 +1,4 @@
 ReaderPanning = InputContainer:new{
-	key_events = {
-		-- these will all generate the same event, just with different arguments
-		MoveUp = { {"Up"}, doc = "move visible area up", event = "Panning", args = {0, -1} },
-		MoveDown = { {"Down"}, doc = "move visible area down", event = "Panning", args = {0,  1} },
-		MoveLeft = { {"Left"}, doc = "move visible area left", event = "Panning", args = {-1, 0} },
-		MoveRight = { {"Right"}, doc = "move visible area right", event = "Panning", args = {1,  0} },
-	},
-
 	-- defaults
 	panning_steps = {
 		normal = 50,
@@ -16,6 +8,27 @@ ReaderPanning = InputContainer:new{
 	},
 }
 
+function ReaderPanning:init()
+	if Device:isTouchDevice() then
+	else
+		self.key_events = {
+			-- these will all generate the same event, just with different arguments
+			MoveUp = {
+				{ "Up" }, doc = "move visible area up",
+				event = "Panning", args = {0, -1} },
+			MoveDown = {
+				{ "Down" }, doc = "move visible area down",
+				event = "Panning", args = {0,  1} },
+			MoveLeft = {
+				{ "Left" }, doc = "move visible area left",
+				event = "Panning", args = {-1, 0} },
+			MoveRight = {
+				{ "Right" }, doc = "move visible area right",
+				event = "Panning", args = {1,  0} },
+		}
+	end
+end
+
 function ReaderPanning:onSetDimensions(dimensions)
 	self.dimen = dimensions
 end