try automate push release

Author: lorenzwalthert

.github/workflows/hook-dependencies-update.yml

@@ -26,6 +26,8 @@ jobs:
         run: Rscript inst/update-existing-hook-dependencies.R
       - name: update existing packages
         run: Rscript inst/update-dependency-graph-existing-packages.R
+      - name: auto-release
+        run: Rscript -e 'renv::restore(); precommit:::auto_release()' 
       - name: Create Pull Request
         uses: peter-evans/[email protected]
         with:
@@ -40,4 +42,8 @@ jobs:
 
             [1]: https://github.com/peter-evans/create-pull-request
           
-            
+      - name: Push latest tag
+        run: > 
+          TAG="v$(Rscript -e 'cat(as.character(desc::desc_get_version()))')"
+          git tag $TAG
+          git push origin $TAG

R/release.R

@@ -73,6 +73,19 @@ release_gh <- function(bump = "dev", is_cran = bump != "dev") {
   }
 }
 
+auto_release <- function() {
+  autoupdate()
+  desc_new <- desc::desc_bump_version("dev")
+  path_template_config <- c(
+    "inst/pre-commit-config-pkg.yaml",
+    "inst/pre-commit-config-proj.yaml"
+  )
+
+  purrr::walk(path_template_config, update_rev_in_config,
+    new_version = as.character(desc_new$get_version())
+  )
+}
+
 git_tag_release <- function(last_release, new_version) {
   sys_call("git", glue::glue('tag -a {new_version} -m "{release_msg(last_release, new_version)}"'))
   sys_call("git", glue::glue("push origin {new_version}"))