From 50387b005f85e36e413485d6a99445b3d771e8f7 Mon Sep 17 00:00:00 2001
From: Candace Savonen <cansav09@gmail.com>
Date: Mon, 1 Jul 2024 14:19:30 -0400
Subject: [PATCH] Arguments are up to date

---
 R/iframe_leanpub.R                     | 6 +-----
 man/website_to_embed_leanpub.Rd        | 6 +-----
 tests/testthat/test-rmd_leanpub_prep.R | 2 --
 3 files changed, 2 insertions(+), 12 deletions(-)

diff --git a/R/iframe_leanpub.R b/R/iframe_leanpub.R
index c7408cd..ed01214 100644
--- a/R/iframe_leanpub.R
+++ b/R/iframe_leanpub.R
@@ -22,8 +22,6 @@
 #' @param quiz_dir directory that contains the quiz .md files that should be
 #' checked and incorporated into the Book.txt file. If you don't have quizzes,
 #' set this to NULL
-#' @param clean_up TRUE/FALSE the old output directory should be deleted and
-#' everything created fresh.
 #' @param footer_text Optionally can add a bit of text that will be added to the
 #' end of each file before the references section.
 #'
@@ -43,7 +41,6 @@ website_to_embed_leanpub <- function(path = ".",
                                       html_page = file.path(base_url, "index.html"),
                                       base_url = NULL,
                                       default_img = NULL,
-                                      render = TRUE,
                                       output_dir = "manuscript",
                                       make_book_txt = FALSE,
                                       quiz_dir = "quizzes",
@@ -54,7 +51,6 @@ website_to_embed_leanpub <- function(path = ".",
   # Run the set up
   set_up_leanpub(
     path = path,
-    clean_up = clean_up,
     render = render,
     output_dir = output_dir,
     make_book_txt = make_book_txt,
@@ -170,7 +166,7 @@ course_to_book_txt <- function(path = ".",
     rmd_regex <- "[.][R|r]md$"
 
     # Extract the names of the Rmd files (the chapters)
-    md_files <- qrqrmd_files(path = path)
+    md_files <- qrmd_files(path = path)
   }
 
   if (!is.null(quiz_dir)) {
diff --git a/man/website_to_embed_leanpub.Rd b/man/website_to_embed_leanpub.Rd
index 4998357..44c7bc5 100644
--- a/man/website_to_embed_leanpub.Rd
+++ b/man/website_to_embed_leanpub.Rd
@@ -10,7 +10,6 @@ website_to_embed_leanpub(
   html_page = file.path(base_url, "index.html"),
   base_url = NULL,
   default_img = NULL,
-  render = TRUE,
   output_dir = "manuscript",
   make_book_txt = FALSE,
   quiz_dir = "quizzes",
@@ -36,8 +35,6 @@ e.g. https://jhudatascience.org/OTTR_Template/coursera}
 
 \item{default_img}{A google slide link to the default image to be used for all chapters}
 
-\item{render}{if `TRUE`, then [bookdown::render_book()] will be run on each Rmd.}
-
 \item{output_dir}{output directory to put files.  It should likely be
 relative to path}
 
@@ -58,8 +55,7 @@ of any image path.}
 \item{footer_text}{Optionally can add a bit of text that will be added to the
 end of each file before the references section.}
 
-\item{clean_up}{TRUE/FALSE the old output directory should be deleted and
-everything created fresh.}
+\item{render}{if `TRUE`, then [bookdown::render_book()] will be run on each Rmd.}
 }
 \value{
 A directory of output files in a folder 'manuscript' for publishing on Leanpub.
diff --git a/tests/testthat/test-rmd_leanpub_prep.R b/tests/testthat/test-rmd_leanpub_prep.R
index f1cdf5b..29f8563 100644
--- a/tests/testthat/test-rmd_leanpub_prep.R
+++ b/tests/testthat/test-rmd_leanpub_prep.R
@@ -20,8 +20,6 @@ test_that("Create Leanpub IFrames for Rmd", {
   # 2. Does chapter_urls.tsv file made have columns with information that are labeled "url", "chapt_title" and "img_path"
 
   set_up_leanpub(
-    clean_up = TRUE,
-    render = TRUE,
     make_book_txt = TRUE,
     quiz_dir = NULL
   )