chore: Use check_installed()

r-prof · Jun 27, 2024 · 4d8e1b9 · 4d8e1b9
1 parent 8c7e1d2
commit 4d8e1b9
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 5 deletions.
diff --git a/R/api.R b/R/api.R
@@ -179,7 +179,7 @@ format.profile_data <- function(x, ...) {
 #' }
 dm_from_profile <- function(x) {
   stopifnot(inherits(x, "profile_data"))
-  stopifnot(rlang::is_installed("dm"))
+  check_installed("dm")
 
   samples <- x$samples
   locations <- x$locations

diff --git a/R/proto.R b/R/proto.R
@@ -1,8 +1,5 @@
 provide_proto <- function() {
-  if (!is_installed("RProtoBuf")) {
-    abort("Package RProtoBuf is required to read pprof files.")
-  }
-
+  check_installed("RProtoBuf")
   install_proto_files()
 }