refactor initialization

[pulsecounter.git] / web / query.cgi

diff --git a/web/query.cgi b/web/query.cgi
index 872023716d1cd12ecd43af9e6bcca7e76b2eed8f..690eb9aaac6953abd8403706c9c2a842f163b277 100755 (executable)
--- a/web/query.cgi
+++ b/web/query.cgi
@@ -71,7 +71,7 @@ cgiMain = do
           ++ ", \"hi\": " ++ show (ohi :: Int)
           ++ "}, \"current\": {\"cold\": " ++ show (floor (ccold :: Double))
           ++ ", \"hot\": " ++ show (floor (chot :: Double))
-          ++ "}}, \"cold\": [" ++ showjson cold
+          ++ "}, \"cold\": [" ++ showjson cold
           ++ "], \"hot\": [" ++ showjson hot ++ "]}\n"
 
 showjson :: [(Int, Double)] -> String