From 7a42cde2a0e0cb5e540508a4b1afdfc27391b779 Mon Sep 17 00:00:00 2001
From: joelnitta <joelnitta@gmail.com>
Date: Sat, 7 Oct 2023 08:57:40 +0900
Subject: [PATCH] Fix pdf paths

---
 R/pub-prep.Rmd | 7 ++++---
 1 file changed, 4 insertions(+), 3 deletions(-)

diff --git a/R/pub-prep.Rmd b/R/pub-prep.Rmd
index 844c0b8..87ba797 100644
--- a/R/pub-prep.Rmd
+++ b/R/pub-prep.Rmd
@@ -35,11 +35,12 @@ mybib_df_raw <-
   )
 # Load other metadata
 mybib_meta <- read_csv(here::here("_bib/ref_metadata.csv")) %>%
-  select(-title) %>%
-  mutate(`file-pdf` = here::here(`file-pdf`))
+  select(-title)
 
 # Check that all pdf files exist
-check_pdfs(mybib_meta)
+mybib_meta  %>%
+  mutate(`file-pdf` = here::here(`file-pdf`)) %>%
+  check_pdfs()
 
 # Format dataframe version of bibliography
 mybib_df <-