diff --git a/samples/client/petstore/r_test/.swagger-codegen/VERSION b/samples/client/petstore/r_test/.swagger-codegen/VERSION
index f9f7450d135..855ff9501eb 100644
--- a/samples/client/petstore/r_test/.swagger-codegen/VERSION
+++ b/samples/client/petstore/r_test/.swagger-codegen/VERSION
@@ -1 +1 @@
-2.3.0-SNAPSHOT
\ No newline at end of file
+2.4.0-SNAPSHOT
\ No newline at end of file
diff --git a/samples/client/petstore/r_test/R/Pet.r b/samples/client/petstore/r_test/R/Pet.r
index 777589993f5..4841762b029 100644
--- a/samples/client/petstore/r_test/R/Pet.r
+++ b/samples/client/petstore/r_test/R/Pet.r
@@ -127,7 +127,7 @@ Pet <- R6::R6Class(
     fromJSONString = function(PetJson) {
       PetObject <- jsonlite::fromJSON(PetJson)
       self$`id` <- PetObject$`id`
-      CategoryObject -> Category$new()
+      CategoryObject <- Category$new()
       self$`category` <- CategoryObject$fromJSON(jsonlite::toJSON(PetObject$category, auto_unbox = TRUE))
       self$`name` <- PetObject$`name`
       self$`photoUrls` <- PetObject$`photoUrls`
diff --git a/samples/client/petstore/r_test/git_push.sh b/samples/client/petstore/r_test/git_push.sh
index ed374619b13..ae01b182ae9 100644
--- a/samples/client/petstore/r_test/git_push.sh
+++ b/samples/client/petstore/r_test/git_push.sh
@@ -36,7 +36,7 @@ git_remote=`git remote`
 if [ "$git_remote" = "" ]; then # git remote not defined
 
     if [ "$GIT_TOKEN" = "" ]; then
-        echo "[INFO] \$GIT_TOKEN (environment variable) is not set. Using the git crediential in your environment."
+        echo "[INFO] \$GIT_TOKEN (environment variable) is not set. Using the git credential in your environment."
         git remote add origin https://github.com/${git_user_id}/${git_repo_id}.git
     else
         git remote add origin https://${git_user_id}:${GIT_TOKEN}@github.com/${git_user_id}/${git_repo_id}.git