diff --git a/DESCRIPTION b/DESCRIPTION index 0eb1a142d..7be46c2a7 100644 --- a/DESCRIPTION +++ b/DESCRIPTION @@ -1,7 +1,7 @@ Package: learnr Type: Package Title: Interactive Tutorials for R -Version: 0.10.1.9006 +Version: 0.10.1.9007 Authors@R: c( person("Barret", "Schloerke", role = c("aut", "cre"), email = "barret@rstudio.com", comment = c(ORCID = "0000-0001-9986-114X")), diff --git a/NEWS.md b/NEWS.md index ea118e998..21537d893 100644 --- a/NEWS.md +++ b/NEWS.md @@ -4,10 +4,11 @@ learnr (development version) ## Breaking Changes * Renamed the `exercise_submission` event to `exercise_result` and added the following fields: - 1. `id` - a randombly generated identifier that can be used to align with the associated `exercise_result` event. + 1. `id` - a randomly generated identifier that can be used to align with the associated `exercise_result` event. 2. `time_elapsed` - the time required to run the exercise (in seconds) 3. `timeout_exceeded` - indicates whether the exercise was interrupted due to an exceeded timeout. May be `NA` for some platforms/evaluators if that information is not known or reported. ([#337](https://github.com/rstudio/learnr/pull/337)) * If a `-code-check` chunk returns feedback for an exercise submission, the result of the exercise is no longer displayed for a correct answer (only the feedback is displayed). If both the result and feedback should be displayed, all checking should be performed in a `-check` chunk (i.e., don't provide a `-code-check` chunk). ([#403](https://github.com/rstudio/learnr/pull/403)) +* `random_praise()` no longer includes the phrase _Correct!_. Instead, it returns a random praising statement. ([#463](https://github.com/rstudio/learnr/pull/463), [#453](https://github.com/rstudio/learnr/issues/453)) ## New features diff --git a/R/praise.R b/R/praise.R index 503d5e02a..85cb0ee87 100644 --- a/R/praise.R +++ b/R/praise.R @@ -62,7 +62,7 @@ random_encouragements <- c( #' @export #' @rdname random_praise random_praise <- function() { - paste0("Correct! ", sample(random_praises, 1)) + sample(random_praises, 1) } #' @export #' @rdname random_praise