diff --git a/r-harmonium/tests/testthat/test_haudiosink.R b/r-harmonium/tests/testthat/test_haudiosink.R
index e6110d6..e746c19 100644
--- a/r-harmonium/tests/testthat/test_haudiosink.R
+++ b/r-harmonium/tests/testthat/test_haudiosink.R
@@ -1,9 +1,9 @@
-# The CI may not have audio support available.
-skip_on_ci()
-
 test_that(
   "haudiosink works.",
   {
+    # The CI may not have audio support available.
+    skip_on_ci()
+
     harmonium_path = system.file(package = "harmonium")
     filepath = file.path(harmonium_path, "testfiles", "gs-16b-2c-44100hz.wav")
     
diff --git a/r-harmonium/tests/testthat/test_hfile.R b/r-harmonium/tests/testthat/test_hfile.R
index 63ed65b..3a23882 100644
--- a/r-harmonium/tests/testthat/test_hfile.R
+++ b/r-harmonium/tests/testthat/test_hfile.R
@@ -1,9 +1,9 @@
-# The CI may not have audio support available.
-skip_on_ci()
-
 test_that(
   "hfile works.",
   {
+    # The CI may not have audio support available.
+    skip_on_ci()
+
     harmonium_path = system.file(package = "harmonium")
     filepath = file.path(harmonium_path, "testfiles", "gs-16b-2c-44100hz.flac")
     expect_equal(HFile$params(filepath), c(44100.00000,698194.00000,2.00000,15.8320635))