From: Ian Jackson <ian@liberator.relativity.greenend.org.uk>
Date: Sun, 13 Feb 2011 12:45:26 +0000 (+0000)
Subject: gui: tractbreak: get sense of power/brake correct
X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~ijackson/git?a=commitdiff_plain;h=a5fe70a630227f83e91b94ba9121e63e5d09d87c;p=trains.git

gui: tractbreak: get sense of power/brake correct
---

diff --git a/hostside/gui b/hostside/gui
index a8d5c72..426c558 100755
--- a/hostside/gui
+++ b/hostside/gui
@@ -870,10 +870,10 @@ proc ib-ev/gamepad/EV_ABS/ABS_THROTTLE {devid value} {
 	speedw-userinput-tractbrake $in(speedw) 0 0
 	return
     }
-    if {$value > 0} {
-	speedw-userinput-tractbrake $in(speedw) $value 0
+    if {$value < 0} {
+	speedw-userinput-tractbrake $in(speedw) [expr {-$value}] 0
     } {
-	speedw-userinput-tractbrake $in(speedw) 0 [expr {-$value}]
+	speedw-userinput-tractbrake $in(speedw) 0 $value
     }
 }