update test 2309.2

Author: Mukulyadav2004

inst/tests/tests.Rraw

@@ -21087,6 +21087,6 @@ test(2308.02, fread("date\nNA\n2014-12-05", keepLeadingZeros=FALSE), dt)
 
 # Test that as.data.table.data.table preserves key when explicitly specified but not when omitted
 test(2309.01, key(as.data.table(data.frame(t = c(3:1,4:5), y = 1:5), key = "t")), "t")
-test(2309.02, key(as.data.table(tibble::tibble(t = c(3:1,4:5), y = 1:5), key = "t")), "t")
+test(2309.02, if (requireNamespace("tibble", quietly = TRUE)) key(as.data.table(tibble::tibble(t = c(3:1,4:5), y = 1:5), key = "t")), "t")
 test(2309.03, key(as.data.table(data.table(t = c(3:1,4:5), y = 1:5), key = "t")), "t")
 test(2309.04, key(as.data.table(data.table(t = c(3:1,4:5), key = "t"))), NULL)