generalize the error message

douwe · douwe · commit 2c825e6ea0bb · 2026-03-01T12:15:48.000+01:00
diff --git a/R/guide.R b/R/guide.R
@@ -110,8 +110,9 @@ validate_plate_format <- function(guide) {
     )
   }
   if (!(as.character(guide$plate.format) %in% names(.plateformats))) {
+    formats <- names(.plateformats)
     rlang::abort(glue::glue(
-      "The plate format in the spreadsheet guide is not valid. It must be one of '24', '48', '96', or '384'."
+      "The plate format in the spreadsheet guide is not valid. It must be one of {paste0(formats, collapse = ', ')}"
     ))
   }
 }

Original file line number	Diff line number	Diff line change
`@@ -110,8 +110,9 @@ validate_plate_format <- function(guide) {`
`110`	`110`	`)`
`111`	`111`	`}`
`112`	`112`	`if (!(as.character(guide$plate.format) %in% names(.plateformats))) {`
	`113`	`+ formats <- names(.plateformats)`
`113`	`114`	`rlang::abort(glue::glue(`
`114`		`- "The plate format in the spreadsheet guide is not valid. It must be one of '24', '48', '96', or '384'."`
	`115`	`+ "The plate format in the spreadsheet guide is not valid. It must be one of {paste0(formats, collapse = ', ')}"`
`115`	`116`	`))`
`116`	`117`	`}`
`117`	`118`	`}`