hasTimeout :: String -> IO Bool
hasTimeout ids = elem ids <$> readIORef timeoutStore
hasTimeout :: String -> IO Bool
hasTimeout ids = elem ids <$> readIORef timeoutStore
hasTimeout ids = elem ids <$> readIORef timeoutStore