diff --git a/R/print.R b/R/print.R
index a33b61d..eb006de 100644
--- a/R/print.R
+++ b/R/print.R
@@ -1,13 +1,15 @@
 #' @export
 print.kableExtra <- function(x, ...) {
-  cat(as.character(x))
   html_header <- htmltools::tags$head(
     rmarkdown::html_dependency_jquery(),
     rmarkdown::html_dependency_bootstrap(theme = "simplex"),
     html_dependency_kePrint()
   )
   html_table <- htmltools::HTML(as.character(x))
-  htmltools::html_print(htmltools::tagList(html_header, html_table))
+  html_result <- htmltools::tagList(html_header, html_table)
+  htmltools::html_print(html_result)
+
+  print(html_result)
 }
 
 html_dependency_kePrint <- function() {