[chronojump] Fixed crash on paintCrossVariables 1RM since Sept 5 (does not affect 1.6.2)

[Xavier de Blas <xaviblas src gnome org>]

commit b757f10f8af1158822bb0442a86db0b0a7301730
Author: Xavier de Blas <xaviblas gmail com>
Date:   Mon Oct 17 17:44:00 2016 +0200

    Fixed crash on paintCrossVariables 1RM since Sept 5 (does not affect 1.6.2)

 encoder/graph.R |    9 +++++----
 1 files changed, 5 insertions(+), 4 deletions(-)
---
diff --git a/encoder/graph.R b/encoder/graph.R
index 616f952..1a618d5 100644
--- a/encoder/graph.R
+++ b/encoder/graph.R
@@ -1601,7 +1601,7 @@ paintCrossVariables <- function (paf, varX, varY, option,
                        colBalls="red"
                        bgBalls="pink"
                }
-       
+
                pchVector = createPchVector(ecconVector)
 
                laterality = as.vector(paf[,findPosInPaf("Laterality","")])
@@ -2111,7 +2111,8 @@ createEcconVector <- function(singleFile, Eccon, curvesNum, ecconVectorNotSingle
 
        return (ecconVector)
 }
-createPchVector <- function(ecconVector) {
+createPchVector <- function(ecconVector)
+{
        pchVector = ecconVector
        pchVector[pchVector == "ec"] <- "21"
        pchVector[pchVector == "ce"] <- "21"
@@ -3082,8 +3083,8 @@ doProcess <- function(options)
                        
                        ecconVector = createEcconVector(singleFile, op$Eccon, length(curves[,1]), curves[,8])
 
-                       paintCrossVariables(paf, "Load", "Speed", 
-                                           "mean", FALSE,
+                       paintCrossVariables(paf, "Load", "Speed", "mean",
+                                           FALSE, NULL,
                                            "ALONE", op$Title,
                                            singleFile,
                                            op$Eccon,