manageReadyStatus Ready = do
    putLogInfo "Now ready."
    setGlobal readyStatus True
manageReadyStatus Ready = do
    putLogInfo "Now ready."
    setGlobal readyStatus True
manageReadyStatus Ready = do
    putLogInfo "Now ready."
    setGlobal readyStatus True