[chronojump] Fixed paint in non-propulsive

[Xavier de Blas <xaviblas src gnome org>]

commit 6da0d398b0cf2681e582fb0e270e0be19cff3dec
Author: Xavier de Blas <xaviblas gmail com>
Date:   Thu Apr 24 21:54:17 2014 +0200

    Fixed paint in non-propulsive

 encoder/graph.R |    3 +++
 1 files changed, 3 insertions(+), 0 deletions(-)
---
diff --git a/encoder/graph.R b/encoder/graph.R
index e37f8b1..dde17c7 100644
--- a/encoder/graph.R
+++ b/encoder/graph.R
@@ -952,6 +952,9 @@ paint <- function(displacement, eccon, xmin, xmax, yrange, knRanges, superpose,
        #accel2 <- accel2 * 1000
        #print(accel2)
 
+       #define a propulsiveEnd value because it's used also in non-propulsive curves
+       propulsiveEnd = length(displacement)
+
        if(isPropulsive) {
                propulsiveEnd = findPropulsiveEnd(accel$y, concentric)
                if(eccon != "c")