preserve NULL here (e.g. when input is text and not file) since sans_…

…ext() will always return character output, so that fig.path/cache.path can be correct set later
yihui · Jul 26, 2024 · 70aed71 · 70aed71
1 parent a89d979
commit 70aed71
Show file tree

Hide file tree

Showing 2 changed files with 3 additions and 2 deletions.
diff --git a/DESCRIPTION b/DESCRIPTION
@@ -1,7 +1,7 @@
 Package: litedown
 Type: Package
 Title: A Lightweight Version of R Markdown
-Version: 0.0.30
+Version: 0.0.31
 Authors@R: c(
    person("Yihui", "Xie", role = c("aut", "cre"), email = "xie@yihui.name", comment = c(ORCID = "0000-0003-0645-5666")),
    person()

diff --git a/R/fuse.R b/R/fuse.R
@@ -409,7 +409,8 @@ fuse = function(input, output = NULL, text = NULL, envir = parent.frame(), quiet
   full = is_output_full(output)
   format = detect_format(output, yaml)
   output = auto_output(input, output, format)
-  output_base = sans_ext(output_path(input, output))
+  if (!is.null(output_base <- output_path(input, output)))
+    output_base = sans_ext(output_base)
 
   # restore and clean up some objects on exit
   opts = reactor(); opts2 = as.list(opts); on.exit(reactor(opts2), add = TRUE)