change regex to find first YAML header in file

petzi53 · May 9, 2023 · 927391a · 927391a
1 parent 4924e6b
commit 927391a
Show file tree

Hide file tree

Showing 2 changed files with 6 additions and 1 deletion.
diff --git a/NEWS.md b/NEWS.md
@@ -1,3 +1,8 @@
+# quartopost 0.2.2
+
+* Find the first YAML header to prevent that YAML from R code example is taken 
+
+
 # quartopost 0.2.1
 
 * Resolved bug to find YAML header

diff --git a/R/utils.R b/R/utils.R
@@ -108,7 +108,7 @@ get_cat <- function() {
     # read file contents into list variable
     for (i in 1:length(fp)) {
         f_list[i] <- readr::read_file(fp[i]) |>
-        stringr::str_extract(stringr::regex("^---[\\s\\S]*^---\\n", multiline = TRUE))
+        stringr::str_extract(stringr::regex("^---[\\s\\S]*?^---\\n", multiline = TRUE))
     }
 
     # extract yaml content