Fix test for S17 Vnish devices

dmp1ce · Nov 14, 2019 · 2821407 · 2821407
1 parent bd41339
commit 2821407
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/test/Spec.hs b/test/Spec.hs
@@ -200,7 +200,7 @@ json = testGroup "json tests"
     ((decodeReply exampleReplyS17Vnish) /= Nothing) @? "exampleReply could not be decoded"
   , testCase "Can get stats (s17 vnish)" $
       let Just x = decodeReply exampleReplyS17Vnish
-      in (getStats x) @?= (Right $ Stats (Just $ Watt 2385)
+      in (getStats x) @?= (Right $ Stats (Just $ Watt 2800)
                            [ ("temp1"::T.Text, 55::Rational)
                            , ("temp2"::T.Text, 57)
                            , ("temp3", 56)