diff --git a/R/get_skimmers.R b/R/get_skimmers.R
index e41b825a..4412f89d 100644
--- a/R/get_skimmers.R
+++ b/R/get_skimmers.R
@@ -216,6 +216,7 @@ get_skimmers.AsIs <- function(column) {
 #'  Finds the appropriate skimmers for the underlying data in the vector.
 #' @export
 get_skimmers.haven_labelled <- function(column) {
+  stopifnot(requireNamespace("haven", quietly = TRUE))
   get_skimmers(vctrs::vec_data(column))
 }
 
diff --git a/tests/testthat/dplyr/filter-no-skim.txt b/tests/testthat/dplyr/filter-no-skim.txt
index 8f4b7ac8..dce473a4 100644
--- a/tests/testthat/dplyr/filter-no-skim.txt
+++ b/tests/testthat/dplyr/filter-no-skim.txt
@@ -1,5 +1,5 @@
 # A tibble: 0 x 15
-# ... with 15 variables: skim_type <chr>, skim_variable <chr>, n_missing <int>,
-#   complete_rate <dbl>, factor.ordered <lgl>, factor.n_unique <int>, factor.top_counts <chr>,
-#   numeric.mean <dbl>, numeric.sd <dbl>, numeric.p0 <dbl>, numeric.p25 <dbl>, numeric.p50 <dbl>,
-#   numeric.p75 <dbl>, numeric.p100 <dbl>, numeric.hist <chr>
+# i 15 variables: skim_type <chr>, skim_variable <chr>, n_missing <int>, complete_rate <dbl>,
+#   factor.ordered <lgl>, factor.n_unique <int>, factor.top_counts <chr>, numeric.mean <dbl>,
+#   numeric.sd <dbl>, numeric.p0 <dbl>, numeric.p25 <dbl>, numeric.p50 <dbl>, numeric.p75 <dbl>,
+#   numeric.p100 <dbl>, numeric.hist <chr>