diff --git a/User-Lookup/get_users_with_bearer_token.r b/User-Lookup/get_users_with_bearer_token.r
index 9585655..8e4d44f 100644
--- a/User-Lookup/get_users_with_bearer_token.r
+++ b/User-Lookup/get_users_with_bearer_token.r
@@ -16,5 +16,5 @@ response <-
             httr::add_headers(.headers = headers),
             query = params)
 
-obj <- httr::content(res, as = "text")
+obj <- httr::content(response, as = "text")
 print(obj)