Also record path

rstudio · Apr 24, 2024 · 03755ca · 03755ca
1 parent d7bed3a
commit 03755ca
Show file tree

Hide file tree

Showing 3 changed files with 8 additions and 3 deletions.
diff --git a/R/fonts.R b/R/fonts.R
@@ -443,7 +443,9 @@ font_dep_google_local <- function(x) {
       return(font_dep_google_local(x))
     }
     if (needs_message) {
-      rlang::inform(paste0("Downloading google font ", x$family, " to local cache"))
+      rlang::inform(paste0(
+        "Downloading google font ", x$family, " to local cache (", x$cache$dir(), ")"
+      ))
       needs_message <<- FALSE
     }
 

diff --git a/tests/testthat/_snaps/font-objects.md b/tests/testthat/_snaps/font-objects.md
@@ -190,7 +190,7 @@
     Code
       tagz <- renderTags(tags$style(sass(scss)))
     Message
-      Downloading google font Pacifico to local cache
+      Downloading google font Pacifico to local cache (<temp-cache>)
 
 ---
 

diff --git a/tests/testthat/test-font-objects.R b/tests/testthat/test-font-objects.R
@@ -62,7 +62,10 @@ test_that("font_google(local = TRUE) basically works", {
   )
 
   # 1st time rendering font should add files to cache
-  expect_snapshot(tagz <- renderTags(tags$style(sass(scss))))
+  expect_snapshot(
+    tagz <- renderTags(tags$style(sass(scss))),
+    transform = function(x) gsub(normalizePath(tmpdir), "<temp-cache>", x)
+  )
   size <- cache$size()
   expect_true(size > 0)
-Original file line number
+Diff line change
@@ Expand Up / @@ -190,7 +190,7 @@ @@
         Code
           tagz <- renderTags(tags$style(sass(scss)))
         Message
-          Downloading google font Pacifico to local cache
+          Downloading google font Pacifico to local cache (<temp-cache>)
     ---
@@ Expand Down @@