Merge branch 'hook-dependencies-update'

Author: lorenzwalthert

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

@@ -17,15 +17,18 @@ jobs:
       - uses: r-lib/actions/setup-r@v2
         with:
           use-public-rspm: true
-
-      - name: install runtime dependencies
-        run: Rscript -e "install.packages(c('renv', 'jsonlite'))"
-      - name: update PPM URL
-        run: Rscript inst/update-ppm-url.R
-      - name: update dependency graph among packages
-        run: Rscript inst/update-existing-hook-dependencies.R
-      - name: update existing packages
-        run: Rscript inst/update-dependency-graph-existing-packages.R
+#       - name: install runtime dependencies
+#         run: Rscript -e "install.packages(c('renv', 'jsonlite'))"
+#       - name: update PPM URL
+#         run: Rscript inst/update-ppm-url.R
+#       - name: update dependency graph among packages
+#         run: Rscript inst/update-existing-hook-dependencies.R
+#       - name: update existing packages
+#         run: Rscript inst/update-dependency-graph-existing-packages.R
+      - name: install pre-commit
+        run: pip3 install pre-commit
+      - name: auto-release
+        run: Rscript -e 'source("renv/activate.R"); renv::restore(); renv::install("."); precommit:::auto_release()' 
       - name: Create Pull Request
         uses: peter-evans/[email protected]
         with:
@@ -40,4 +43,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,18 @@ release_gh <- function(bump = "dev", is_cran = bump != "dev") {
   }
 }
 
+auto_release <- function() {
+  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}"))