adds setup-r-icons

Author: tomjemmett

.github/workflows/test-setup-r-icons.yaml

@@ -0,0 +1,30 @@
+on:
+  push:
+    branches: [main]
+
+name: Test Setup R Icons
+
+jobs:
+  test-setup-r-icons:
+    runs-on: ubuntu-latest
+          
+    env:
+      GITHUB_PAT: ${{ secrets.GITHUB_TOKEN }}
+      
+    steps:
+      - uses: actions/checkout@v2
+
+      - uses: r-lib/actions/setup-r@v1
+        with:
+          use-public-rspm: true
+
+      - uses: tomjemmett/setup-r-icons@main
+        with:
+          icon-sets: fontawesome,simple_icons
+
+      - name: Show icons folder
+        run: ls ~/.local/share/rpkg_icon
+
+      - name: Test it worked
+        run: icons::icon_find("envelope")
+        shell: Rscript {0}

README.md

@@ -0,0 +1,32 @@
+# setup-r-icons
+
+This action downloads and installs the [`{icons}`](https://github.com/mitchelloharawild/icons) package and then optionally downloads individual icon libraries. It then caches whatever font's have been installed to improve future runtimes.
+
+This action needs R to have previously been setup (e.g. with [`r-lib/actions/setup-r`](https://github.com/r-lib/actions/tree/master/setup-r)).
+
+## Inputs
+
+* `cache-version` - default `1`. If you need to invalidate the existing cache pass any other number and a new cache will be used.
+* `icon-sets` - default ''. Comma separated list of the font's to download, see below for further details
+
+## Fonts
+
+The font set's that are available to download can be found in the `{icons}` package, named as `download_*()`. Currently available are:
+* `bioicons`
+* `feather_icons`
+* `fontawesome`
+* `google_material`
+* `ionicons`
+* `octicons`
+* `simple_icons`
+
+## Usage
+
+``` yaml
+steps:
+- uses: actions/checkout@v2
+- uses: r-lib/actions/setup-r@v1
+- uses: tomjemmett/setup-r-icons@main
+  with:
+    icon-sets: fontawesome,simple_icons
+```

action.yaml

@@ -0,0 +1,51 @@
+name: 'setup-r-icons'
+description: 'Action to setup the icons package and download fonts'
+author: 'Tom Jemmett'
+inputs:
+  cache-version:
+    description: 'The version of the cache, change this from the default (1) to start over with a fresh cache'
+    required: true
+    default: 1
+  icon-sets:
+    description: 'Icon sets to download. Should be a common separated string with no whitespace. See the {icons} package for available icon sets (download_*() functions)'
+    required: true
+    default: ''
+
+runs:
+  using: "composite"
+  steps:
+    - name: Install dependencies
+      run: |
+        install.packages(c("remotes", "rappdirs", "gh"))
+        remotes::install_github("mitchelloharawild/icons")
+      shell: Rscript {0}
+
+    - name: Write icon-sets
+      run: |
+        writeLines("${{ inputs.icon-sets }}", "icon-sets.txt")
+      shell: Rscript {0}
+
+    - name: Get icons path
+      id: get-icons-path
+      run: |
+        cat("::set-output name=icons-path::", rappdirs::user_data_dir("rpkg_icon"), "\n", sep = "")
+      shell: Rscript {0}
+
+    - name: Restore downloaded icons
+      uses: actions/cache@v2
+      with:
+        path: ${{ steps.get-icons-path.outputs.icons-path }}
+        key: ${{ runner.os }}-icons-${{ inputs.cache-version }}-${{ hashFiles('icon-sets.txt') }}
+
+    - name: Download fonts
+      run: |
+        library(icons)
+
+        icons <- strsplit("${{ inputs.icon-sets }}", ",")[[1]]
+
+        for (i in icons) {
+          if (!icon_installed(get(i))) {
+            get(paste0("download_", i))()
+          }
+        }
+      shell: Rscript {0}