From 6deb700590d0000c4f8cce050990394f381ddecf Mon Sep 17 00:00:00 2001
From: Benjamin Auder <benjamin.auder@somewhere>
Date: Wed, 22 Mar 2017 17:41:17 +0100
Subject: [PATCH] final fix: tz=working_tz in as.POSIXlt(...)

---
 pkg/R/getData.R | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/pkg/R/getData.R b/pkg/R/getData.R
index 9ed0217..e13cf86 100644
--- a/pkg/R/getData.R
+++ b/pkg/R/getData.R
@@ -76,7 +76,7 @@ getData = function(ts_data, exo_data, input_tz="GMT", date_format="%d/%m/%Y %H:%
 				serie = c(serie, ts_df[line,2])
 				line = line + 1
 			};
-			if (line >= nb_lines + 1 || as.POSIXlt(ts_df[line-1,1])$hour == predict_at)
+			if (line >= nb_lines + 1 || as.POSIXlt(ts_df[line-1,1],tz=working_tz)$hour == predict_at)
 				break
 		}
 
-- 
2.44.0