master
generateCorrelationId = do uuid <- newUUID return $ UUID.toText uuid
Found
do uuid <- newUUID return $ UUID.toText uuid
Perhaps
do UUID.toText <$> newUUID