Fixed #29
diff --git a/R/kable_styling.R b/R/kable_styling.R
index f68b60c..764e011 100644
--- a/R/kable_styling.R
+++ b/R/kable_styling.R
@@ -269,7 +269,7 @@
caption_without_lab <- sub("\\\\label\\{[^\\}]*\\}", "", table_info$caption)
repeat_header_text <- paste(caption_without_lab, repeat_header_text)
}
- continue_line <- paste0("\\caption{", repeat_header_text, "}\\\\")
+ continue_line <- paste0("\\caption[]{", repeat_header_text, "}\\\\")
}
x <- c(
diff --git a/tests/visual_tests/longtable.Rmd b/tests/visual_tests/longtable.Rmd
index fef0f3b..47b1f50 100644
--- a/tests/visual_tests/longtable.Rmd
+++ b/tests/visual_tests/longtable.Rmd
@@ -5,6 +5,8 @@
keep_tex: true
---
+\listoftables
+
```{r setup, include=FALSE}
knitr::opts_chunk$set(echo = TRUE)
```
@@ -22,7 +24,7 @@
```
```{r}
-kable_input <- kable(dt, "latex", longtable = T, caption = "test", booktabs = T) %>%
+kable(dt, "latex", longtable = T, caption = "test", booktabs = T) %>%
kable_styling(latex_options = c("striped", "repeat_header"), repeat_header_text = "(...)")
```