GHA: Better identification of future backend package

Author: HenrikBengtsson

.github/workflows/future_tests-future.batchtools.yaml

@@ -60,10 +60,10 @@ jobs:
 
       - name: Install 'future.tests' and any backend R packages
         run: |
-          if (grepl("::", plan <- "${{ matrix.future.plan }}") &&
-              nzchar(pkg <- sub("::.*", "", plan))) {
-            install.packages(pkg)
-          }
+          ## Identify and install future backend package in 'plan' variable, if any
+          plan <- "${{ matrix.future.plan }}"
+          pattern <- ".*(future[.][[:alnum:]]+)::[[:alnum:]]+.*"
+          if (grepl(pattern, plan) && nzchar(pkg <- sub(pattern, "\\1", plan))) install.packages(pkg)
         shell: Rscript {0}
 
       - name: Session info

.github/workflows/future_tests-future.callr.yaml

@@ -59,10 +59,10 @@ jobs:
 
       - name: Install 'future.tests' and any backend R packages
         run: |
-          if (grepl("::", plan <- "${{ matrix.future.plan }}") &&
-              nzchar(pkg <- sub("::.*", "", plan))) {
-            install.packages(pkg)
-          }
+          ## Identify and install future backend package in 'plan' variable, if any
+          plan <- "${{ matrix.future.plan }}"
+          pattern <- ".*(future[.][[:alnum:]]+)::[[:alnum:]]+.*"
+          if (grepl(pattern, plan) && nzchar(pkg <- sub(pattern, "\\1", plan))) install.packages(pkg)
         shell: Rscript {0}
 
       - name: Session info

.github/workflows/future_tests-future.mirai.yaml

@@ -60,10 +60,10 @@ jobs:
 
       - name: Install 'future.tests' and any backend R packages
         run: |
-          if (grepl("::", plan <- "${{ matrix.future.plan }}") &&
-              nzchar(pkg <- sub("::.*", "", plan))) {
-            install.packages(pkg)
-          }
+          ## Identify and install future backend package in 'plan' variable, if any
+          plan <- "${{ matrix.future.plan }}"
+          pattern <- ".*(future[.][[:alnum:]]+)::[[:alnum:]]+.*"
+          if (grepl(pattern, plan) && nzchar(pkg <- sub(pattern, "\\1", plan))) install.packages(pkg)
         shell: Rscript {0}
 
       - name: Session info

.github/workflows/future_tests-future.yaml

@@ -62,10 +62,10 @@ jobs:
 
       - name: Install 'future.tests' and any backend R packages
         run: |
-          if (grepl("::", plan <- "${{ matrix.future.plan }}") &&
-              nzchar(pkg <- sub("::.*", "", plan))) {
-            install.packages(pkg)
-          }
+          ## Identify and install future backend package in 'plan' variable, if any
+          plan <- "${{ matrix.future.plan }}"
+          pattern <- ".*(future[.][[:alnum:]]+)::[[:alnum:]]+.*"
+          if (grepl(pattern, plan) && nzchar(pkg <- sub(pattern, "\\1", plan))) install.packages(pkg)
         shell: Rscript {0}
 
       - name: Session info

vignettes/future.tests-05-ci-github_actions.md

@@ -87,8 +87,10 @@ jobs:
       - name: Install 'future.tests' and any backend R packages
         run: |
           remotes::install_cran("future.tests")
-          remotes::install_github("HenrikBengtsson/future.tests", ref="develop")
-          if (grepl("::", plan <- "${{ matrix.future.plan }}") && nzchar(pkg <- sub("::.*", "", plan))) install.packages(pkg)
+          ## Identify and install future backend package in 'plan' variable, if any
+          plan <- "${{ matrix.future.plan }}"
+          pattern <- ".*(future[.][[:alnum:]]+)::[[:alnum:]]+.*"
+          if (grepl(pattern, plan) && nzchar(pkg <- sub(pattern, "\\1", plan))) install.packages(pkg)
         shell: Rscript {0}
 
       - name: Session info