diff --git a/R/snapshot-manage.R b/R/snapshot-manage.R
index afd1cbc29..834212b3b 100644
--- a/R/snapshot-manage.R
+++ b/R/snapshot-manage.R
@@ -161,7 +161,7 @@ snapshot_meta <- function(files = NULL, path = "tests/testthat") {
     files <- files[!is_dir]
 
     dirs <- substr(dirs, 1, nchar(dirs) - 1)
-    files <- ifelse(tools::file_ext(files) == "", paste0(files, ".md"), files)
+    files <- ifelse(grepl("\\.md$", files), files, paste0(files, ".md"))
 
     out <- out[out$name %in% files | out$test %in% dirs, , drop = FALSE]
   }