keep entire line starting

\begin{table}. Fixes #796.
haozhu233 · Dec 11, 2023 · 7515233 · 7515233
1 parent 70bd592
commit 7515233
Showing 1 changed file with 3 additions and 2 deletions.
diff --git a/R/kable_styling.R b/R/kable_styling.R
@@ -566,8 +566,9 @@ styling_latex_position_center <- function(x, table_info, hold_position,
     } else if(hold_position == "HOLD_position") {
       x <- styling_latex_HOLD_position(x)
     }
-  } else if (table_info$table_env)
-    x <- sub("^\\\\begin\\{table}", "\\\\begin{table}\n\\\\centering", x)
+  } else if (table_info$table_env) {
+    x <- sub("^(\\\\begin\\{table}[^\n]*)\\n", "\\1\n\\\\centering", x)
+  }
   return(x)
 }