diff --git a/R/magic_mirror.R b/R/magic_mirror.R
index 93f6860..6270191 100644
--- a/R/magic_mirror.R
+++ b/R/magic_mirror.R
@@ -25,8 +25,7 @@
   return(kable_info)
 }
 
-#' Magic mirror for latex tables --------------
-#' @param kable_input The output of kable
+# Magic mirror for latex tables --------------
 magic_mirror_latex <- function(kable_input){
   kable_info <- list(tabular = NULL, booktabs = FALSE, align = NULL,
                      valign = NULL, ncol = NULL, nrow = NULL, colnames = NULL,
@@ -88,9 +87,7 @@
   return(kable_info)
 }
 
-#' Magic Mirror for html table --------
-#'
-#' @param kable_input The output of kable
+# Magic Mirror for html table --------
 magic_mirror_html <- function(kable_input){
   kable_info <- list()
   kable_xml <- read_kable_as_xml(kable_input)
diff --git a/R/util.R b/R/util.R
index 87f72c8..3b52794 100644
--- a/R/util.R
+++ b/R/util.R
@@ -8,14 +8,6 @@
 
 rmd_format <- function(){
   rmd_output_metadata <- metadata$output
-  # rmd_fmt <- ifelse(
-  #   is.null(rmd_output_metadata),
-  #   "markdown", ifelse(
-  #   rmd_output_metadata %in% c("html_document", "rmarkdown::html_vignette"),
-  #   "html",ifelse(
-  #     rmd_output_metadata %in% c("pdf_document", "rmarkdown::tufte_handout"),
-  #     "latex", "markdown"
-  #   )))
   return(names(rmd_output_metadata))
 }