Skip to content

Commit

Permalink
Stop brk_manual() returning breaks invisibly
Browse files Browse the repository at this point in the history
  • Loading branch information
hughjonesd committed Jun 11, 2024
1 parent 4902715 commit 7ba5cb7
Showing 1 changed file with 2 additions and 1 deletion.
3 changes: 2 additions & 1 deletion R/breaks-misc.R
Original file line number Diff line number Diff line change
Expand Up @@ -51,12 +51,13 @@ brk_manual <- function (breaks, left_vec) {
length(left_vec) == length(breaks)
)


function (x, extend, left, close_end) {
if (! left) warning("Ignoring `left` with `brk_manual()`")
if (! close_end) warning("Ignoring `close_end` with `brk_manual()`")
breaks <- create_breaks(breaks, left_vec)
breaks <- extend_and_close(breaks, x, extend, left = TRUE, close_end = FALSE)

breaks
}
}

Expand Down

0 comments on commit 7ba5cb7

Please sign in to comment.