diff --git a/R/kable_styling.R b/R/kable_styling.R
index b034d36..bb9cd4c 100644
--- a/R/kable_styling.R
+++ b/R/kable_styling.R
@@ -292,12 +292,14 @@
     continue_line <- paste0("\\caption[]{", repeat_header_text, "}\\\\")
   }
 
+  x <- x[x != "\\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")
diff --git a/tests/visual_tests/longtable.Rmd b/tests/visual_tests/longtable.Rmd
index 2653dc1..4e6a064 100644
--- a/tests/visual_tests/longtable.Rmd
+++ b/tests/visual_tests/longtable.Rmd
@@ -16,7 +16,7 @@
 library(knitr)
 library(kableExtra)
 
-dt <- rbind(mtcars, mtcars) 
+dt <- rbind(mtcars[1:30,], mtcars) 
 
 # kable(dt, "latex", longtable = T, caption="test table") %>%
 #   add_header_above(c(" ", "a" = 6, "b" = 5)) %>%