diff --git a/DESCRIPTION b/DESCRIPTION
index 3b9ead7..e253d5c 100644
--- a/DESCRIPTION
+++ b/DESCRIPTION
@@ -1,6 +1,6 @@
 Package: lgpr
 Title: Longitudinal Gaussian Process Regression
-Version: 1.2.4
+Version: 1.2.5
 Authors@R:
     c(person(given = "Juho",
            family = "Timonen",
@@ -48,7 +48,7 @@ LinkingTo:
     StanHeaders (>= 2.26.0)
 SystemRequirements: GNU make
 NeedsCompilation: yes
-RoxygenNote: 7.3.1
+RoxygenNote: 7.3.2
 Suggests:
     knitr,
     rmarkdown,
diff --git a/R/utils-create_model-prior.R b/R/utils-create_model-prior.R
index 7ee6a1b..d06aacd 100644
--- a/R/utils-create_model-prior.R
+++ b/R/utils-create_model-prior.R
@@ -340,7 +340,7 @@ parse_prior_single <- function(desc, num) {
 #' @param desc Prior description as a named list, containing fields
 #' \itemize{
 #'   \item \code{dist} - Distribution name. Must be one of
-#'   {'uniform', 'normal', 'student-t', 'gamma', 'inv-gamma', 'log-normal'}
+#'   'uniform', 'normal', 'student-t', 'gamma', 'inv-gamma', or 'log-normal'
 #'   (case-insensitive)
 #'   \item \code{square} - Is the prior for a square-transformed parameter.
 #' }
diff --git a/man/prior_to_num.Rd b/man/prior_to_num.Rd
index 46b2070..ebe74f6 100644
--- a/man/prior_to_num.Rd
+++ b/man/prior_to_num.Rd
@@ -10,7 +10,7 @@ prior_to_num(desc)
 \item{desc}{Prior description as a named list, containing fields
 \itemize{
   \item \code{dist} - Distribution name. Must be one of
-  {'uniform', 'normal', 'student-t', 'gamma', 'inv-gamma', 'log-normal'}
+  'uniform', 'normal', 'student-t', 'gamma', 'inv-gamma', or 'log-normal'
   (case-insensitive)
   \item \code{square} - Is the prior for a square-transformed parameter.
 }
diff --git a/tests/testthat/test_misc-invgamma.R b/tests/testthat/test_misc-invgamma.R
index 50cb59b..501e278 100644
--- a/tests/testthat/test_misc-invgamma.R
+++ b/tests/testthat/test_misc-invgamma.R
@@ -29,9 +29,7 @@ test_that("plotting the inverse gamma distribution works", {
   b <- 3
   p1 <- plot_invgamma(a, b)
   p2 <- plot_invgamma(a, b, return_quantiles = TRUE)
-  c1 <- as.character(class(p1))
-  c2 <- as.character(class(p2$plot))
-  expect_equal(c1, c("gg", "ggplot"))
-  expect_equal(c2, c("gg", "ggplot"))
+  expect_true(ggplot2::is_ggplot(p1))
+  expect_true(ggplot2::is_ggplot(p2$plot))
   expect_error(plot_invgamma(a, b, IQR = 1.5))
 })