[chronojump] Fixed bug since last commits: on fixed seemed that does not take segments correctly: passes from 5 t

[Xavier de Blas <xaviblas src gnome org>]

commit 45ad5caec78c99cf0da8c2021e4e43bd9d2a213c
Author: Xavier de Blas <xaviblas gmail com>
Date:   Thu Feb 17 17:21:47 2022 +0100

    Fixed bug since last commits: on fixed seemed that does not take segments correctly: passes from 5 to 30

 r-scripts/sprintEncoder.R | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)
---
diff --git a/r-scripts/sprintEncoder.R b/r-scripts/sprintEncoder.R
index 65321fdb7..d1b3c8fdb 100644
--- a/r-scripts/sprintEncoder.R
+++ b/r-scripts/sprintEncoder.R
@@ -691,7 +691,7 @@ getSplits <- function(time, rawPosition, rawForce, rawPower, startSample, endSam
        splitVariableCmIter = 2
        if(splitLength > 0)
        {
-               nextLength = testLength
+               nextLength = splitLength
                continueBucle = (splitPosition[length(splitPosition)] + nextLength < testLength)
        }
        else {
@@ -720,7 +720,7 @@ getSplits <- function(time, rawPosition, rawForce, rawPower, startSample, endSam
 
                if(splitLength > 0)
                {
-                       nextLength = testLength
+                       nextLength = splitLength
                        continueBucle = (splitPosition[length(splitPosition)] + nextLength < testLength)
                }
                else {