Signed-off-by: Klaus Aehlig <[email protected]>
---
 test/hs/Test/Ganeti/Query/Instance.hs | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/test/hs/Test/Ganeti/Query/Instance.hs 
b/test/hs/Test/Ganeti/Query/Instance.hs
index b2406c1..1609e04 100644
--- a/test/hs/Test/Ganeti/Query/Instance.hs
+++ b/test/hs/Test/Ganeti/Query/Instance.hs
@@ -54,7 +54,8 @@ createInstance name pnodeUuid adminState adminStateSource =
     (GenericContainer Map.empty)
     (PartialBeParams Nothing Nothing Nothing Nothing Nothing Nothing)
     (GenericContainer Map.empty) (GenericContainer Map.empty)
-    adminState adminStateSource [] [] DTDrbd8 False Nothing epochTime 
epochTime "" 0 Set.empty
+    adminState adminStateSource [] [] DTDrbd8 False Nothing epochTime epochTime
+    "" 0 Set.empty
   where epochTime = TOD 0 0
 
 -- | A fake InstanceInfo to be used to check values.
-- 
1.9.1.423.g4596e3a

Reply via email to