Require rlang 1.0.1

DESCRIPTION

@@ -24,7 +24,7 @@ Imports:
     fansi,
     glue,
     lifecycle,
-    rlang (>= 0.3.0),
+    rlang (>= 1.0.1),
     utf8 (>= 1.1.0),
     utils,
     vctrs (>= 0.3.8)

R/compat-lifecycle.R

@@ -0,0 +1,51 @@
+# nocov start - compat-lifecycle (last updated: rlang 0.3.0.9000)
+
+scoped_lifecycle_silence <- function(frame = rlang::caller_env()) {
+  rlang::local_options(
+    .frame = frame,
+    lifecycle_verbosity = "quiet"
+  )
+}
+with_lifecycle_silence <- function(expr) {
+  scoped_lifecycle_silence()
+  expr
+}
+
+scoped_lifecycle_warnings <- function(frame = rlang::caller_env()) {
+  rlang::local_options(
+    .frame = frame,
+    lifecycle_verbosity = "warning"
+  )
+}
+with_lifecycle_warnings <- function(expr) {
+  scoped_lifecycle_warnings()
+  expr
+}
+
+scoped_lifecycle_errors <- function(frame = rlang::caller_env()) {
+  rlang::local_options(
+    .frame = frame,
+    lifecycle_verbosity = "error"
+  )
+}
+with_lifecycle_errors <- function(expr) {
+  scoped_lifecycle_errors()
+  expr
+}
+
+# Enable once signal_superseded() reaches stable state
+signal_superseded <- function(...) {}
+
+foreign_caller_env <- function(my_env = ns_env()) {
+  for (n in 2:10) {
+    caller <- caller_env(n)
+    if (!is_reference(env_parent(caller), my_env)) {
+      return(caller)
+    }
+  }
+
+  # Safety net
+  caller
+}
+
+# nocov end

tests/testthat/_snaps/ansi/format_multi.md

@@ -21,13 +21,6 @@
     Output
       [1] "\033[31m-1\033[39m"
 
----
-
-    Code
-      style_na("NA")
-    Output
-      [1] "\033[31mNA\033[39m"
-
 ---
 
     Code
@@ -119,7 +112,8 @@
 
     Code
       colonnade(list(a_very_long_column_name = 0), width = 15)
-    Warning <lifecycle_warning_deprecated>
+    Condition
+      Warning:
       `colonnade()` was deprecated in pillar 1.7.0.
       Please use `tbl_format_setup()` instead.
     Output