logInResponse :: Action
logInResponse = errorResponse "Please log in first."
logInResponse :: Action
logInResponse = errorResponse "Please log in first."
logInResponse = errorResponse "Please log in first."