From 19ea8e3f80296d9a35c79ed3a0b2859045b223d2 Mon Sep 17 00:00:00 2001
From: Willem Bult <willem@solvix.nl>
Date: Fri, 17 Jun 2011 15:20:31 -0400
Subject: [PATCH 1/2] More responsive list items (pushed styling), iOS style.
 Requires mobl to propagate events.

---
 mobl/ui/generic.mobl | 22 +++++++++++++++++++---
 1 file changed, 19 insertions(+), 3 deletions(-)

diff --git a/mobl/ui/generic.mobl b/mobl/ui/generic.mobl
index 92468c7..58a2574 100644
--- a/mobl/ui/generic.mobl
+++ b/mobl/ui/generic.mobl
@@ -279,16 +279,32 @@ style itemDownArrowStyle {
 
 control item(style : Style = itemStyle, pushedStyle : Style = itemPushedStyle, onclick : Callback = null, onswipe : Callback = null, hideArrow : Bool = false) {
   var pushed = false
+  var touched = false
   el@<li class=itemStyle class=onclick && hideArrow == false ? mergeStyles([pushed ? pushedStyle : style, itemArrowStyle]) : (pushed ? pushedStyle : style)
   onswipe=onswipe onclick=onclick ? {
-    pushed = true;
-    sleep(100);
+  	pushed = true;
     async {
       onclick(event);
     }
     sleep(200);
     pushed = false;
-  } : null>
+  } : null
+  ontouchdown = {
+  	touched = true;
+  	sleep(200);
+  	if (touched) {
+  		pushed = true;
+  	}
+  }
+  ontouchup = {
+  	touched = false;
+  	pushed = false; 
+  }
+  ontouchdrag = {
+  	touched = false;
+  	pushed = false; 
+  }
+  >
     elements()
   </li>
 }

From 1abda06b76469bcee9bfe3de608020f97c0ce52b Mon Sep 17 00:00:00 2001
From: Willem Bult <willem@solvix.nl>
Date: Fri, 17 Jun 2011 16:35:38 -0400
Subject: [PATCH 2/2] Only show pushed styling for clickable items

---
 mobl/ui/generic.mobl | 12 ++++++------
 1 file changed, 6 insertions(+), 6 deletions(-)

diff --git a/mobl/ui/generic.mobl b/mobl/ui/generic.mobl
index 58a2574..da51dbb 100644
--- a/mobl/ui/generic.mobl
+++ b/mobl/ui/generic.mobl
@@ -289,21 +289,21 @@ control item(style : Style = itemStyle, pushedStyle : Style = itemPushedStyle, o
     sleep(200);
     pushed = false;
   } : null
-  ontouchdown = {
+  ontouchdown=onclick ? {
   	touched = true;
   	sleep(200);
   	if (touched) {
   		pushed = true;
   	}
-  }
-  ontouchup = {
+  } : null
+  ontouchup=onclick ? {
   	touched = false;
   	pushed = false; 
-  }
-  ontouchdrag = {
+  } : null
+  ontouchdrag=onclick ? {
   	touched = false;
   	pushed = false; 
-  }
+  } : null
   >
     elements()
   </li>