Correctly try usethis

cderv · cderv · commit 6327e8cf9f0d · 2025-06-10T18:52:35.000+02:00
diff --git a/R/blog.R b/R/blog.R
@@ -44,9 +44,10 @@ new_blog_post <- function(
   if (open) {
     edit_file <- utils::file.edit
     if (
-      rlang::is_installed("usethis") && rlang::is_callable(usethis::edit_file)
+      rlang::is_installed("usethis") &&
+        is.function(asNamespace("usethis")$edit_file)
     ) {
-      edit_file <- getFromNamespace("edit_file", "usethis")
+      edit_file <- utils::getFromNamespace("edit_file", "usethis")
     }
     edit_file(qmd_path)
   }

Original file line number	Diff line number	Diff line change
`@@ -44,9 +44,10 @@ new_blog_post <- function(`
`44`	`44`	`if (open) {`
`45`	`45`	`edit_file <- utils::file.edit`
`46`	`46`	`if (`
`47`		`- rlang::is_installed("usethis") && rlang::is_callable(usethis::edit_file)`
	`47`	`+ rlang::is_installed("usethis") &&`
	`48`	`+ is.function(asNamespace("usethis")$edit_file)`
`48`	`49`	`) {`
`49`		`- edit_file <- getFromNamespace("edit_file", "usethis")`
	`50`	`+ edit_file <- utils::getFromNamespace("edit_file", "usethis")`
`50`	`51`	`}`
`51`	`52`	`edit_file(qmd_path)`
`52`	`53`	`}`