Fixed wrong warning message

uptake · Dec 4, 2018 · 8ea9c24 · 8ea9c24
1 parent b55f92d
commit 8ea9c24
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 2 deletions.
diff --git a/R/PackageInheritanceReporter.R b/R/PackageInheritanceReporter.R
@@ -136,7 +136,7 @@ InheritanceReporter <- R6::R6Class(
 
                 if (nrow(nodeDT) == 0) {
                     msg <- sprintf(
-                        'No Reference Class or R6 Class definitions found in package %s'
+                        'No S4, Reference, or R6 class definitions found in package %s'
                         , self$pkg_name
                     )
                     log_warn(msg)

diff --git a/tests/testthat/test-InheritanceReporter.R b/tests/testthat/test-InheritanceReporter.R
@@ -145,7 +145,7 @@ test_that("InheritanceReporter should give warning for packages with no classes"
         reporter <- InheritanceReporter$new()
         reporter$set_package("baseballstats")
         reporter$edges
-    }, regexp = "No Reference Class or R6 Class definitions found")
+    }, regexp = "No S4, Reference, or R6 class definitions found")
 })
 
 ##### TEST TEAR DOWN #####