diff --git a/R/kable_styling.R b/R/kable_styling.R
index bb9cd4c..e1d5c81 100644
--- a/R/kable_styling.R
+++ b/R/kable_styling.R
@@ -292,14 +292,15 @@
     continue_line <- paste0("\\caption[]{", repeat_header_text, "}\\\\")
   }
 
-  x <- x[x != "\\bottomrule"]
+  index_bottomrule <- which(x == "\\bottomrule")
+  x <- x[-index_bottomrule]
+  x[index_bottomrule - 1] <- paste0(x[index_bottomrule - 1], "*\\bottomrule")
   x <- c(
     x[1:header_rows_end],
     "\\endfirsthead",
     continue_line,
     x[header_rows_start:header_rows_end],
     "\\endhead",
-    "\\bottomrule\\endlastfoot",
     x[(header_rows_end + 1):length(x)]
   )
   x <- paste0(x, collapse = "\n")