copyedit error message

Author: t-kalinowski

R/property.R

@@ -318,7 +318,7 @@ prop_validate <- function(prop, value, object = NULL) {
   }
 
   stop(sprintf(
-    "%s validator must return NULL or a character, not <%s>",
+    "%s validator must return NULL or a character, not <%s>.",
     prop_label(object, prop$name), typeof(val)
   ))
 }

R/valid.R

@@ -92,7 +92,7 @@ validate <- function(object, recursive = TRUE, properties = TRUE) {
       append(errors) <- error
     } else {
       stop(sprintf(
-        "%s validator is expected to return NULL or a character, not <%s>",
+        "%s validator must return NULL or a character, not <%s>.",
         obj_desc(class), typeof(error)
       ))
     }