[chronojump] Fixed encoder inertial curves values on graph.R

[Xavier de Blas <xaviblas src gnome org>]

commit d44359e822568790146438f6a9c5e3b278051a7c
Author: Xavier de Blas <xaviblas gmail com>
Date:   Fri Feb 27 20:37:24 2015 +0100

    Fixed encoder inertial curves values on graph.R

 encoder/graph.R |    5 ++++-
 1 files changed, 4 insertions(+), 1 deletions(-)
---
diff --git a/encoder/graph.R b/encoder/graph.R
index 5f2310a..70b1d55 100644
--- a/encoder/graph.R
+++ b/encoder/graph.R
@@ -1834,7 +1834,10 @@ doProcess <- function(options)
                        dataTempFile  = dataTempFile[!is.na(dataTempFile)]
 
                        if(isInertial(inputMultiData$econfName[i])) {
-                               dataTempFile = fixDisplacementInertial(dataTempFile, 
inputMultiData$econfName[i], op$diameter, op$diameterExt)
+                               dataTempFile = fixDisplacementInertial(
+                                                                      dataTempFile, 
inputMultiData$econfName[i], 
+                                                                      inputMultiData$econfd[i], 
inputMultiData$econfD[i])
+                               #getDisplacementInertialBody is not needed because it's done on curve save
                        } else {
                                dataTempFile = getDisplacement(inputMultiData$econfName[i], dataTempFile, 
op$diameter, op$diameterExt)
                        }