append no remainder by default

simonpcouch · Oct 28, 2024 · 24e1ee8 · 24e1ee8
1 parent 52ed271
commit 24e1ee8
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/rstudioapi.R b/R/rstudioapi.R
@@ -70,7 +70,7 @@ wipe_selection <- function(selection, context) {
   selection
 }
 
-stream_selection <- function(selection, context, pal, n_lines_orig, remainder) {
+stream_selection <- function(selection, context, pal, n_lines_orig, remainder = "") {
   selection_text <- selection[["text"]]
   output_lines <- character(0)
   stream <- pal[[".__enclos_env__"]][["private"]]$.stream(selection_text)