diff --git a/R/check_hints.R b/R/check_hints.R
index 6900d39..da1ef56 100644
--- a/R/check_hints.R
+++ b/R/check_hints.R
@@ -2,8 +2,8 @@
 #'
 #' @param hint_text hint paragraph texts; can contain markdown
 #' @param hint_title hint title texts; can contain markdown
-#' @param hint_prefix string that added to each hint_title to the left side
-#' @param hint_suffix string that added to each hint_title to the right side
+#' @param hint_title_prefix string that added to each hint_title to the left side
+#' @param hint_title_suffix string that added to each hint_title to the right side
 #' @param hint_id unique identidier for each hint
 #' @param list_title unique identidier for each hint
 #'
@@ -29,7 +29,7 @@ check_hints <- function(hint_text,
                         list_title = "Click here to see/close the list of hints",
                         hint_id){
   if(knitr::is_html_output()){
-    hint_text <- paste0(hint_prefix, hint_text, hint_suffix)
+    hint_title <- paste0(hint_title_prefix, hint_title, hint_title_suffix)
     df <- data.frame(hint_text, hint_title, stringsAsFactors = FALSE)
     df$hint_id <- sample(2:1e5, nrow(df))
 
diff --git a/man/check_hints.Rd b/man/check_hints.Rd
index 111a0c4..9650e73 100644
--- a/man/check_hints.Rd
+++ b/man/check_hints.Rd
@@ -18,13 +18,13 @@ check_hints(
 
 \item{hint_title}{hint title texts; can contain markdown}
 
-\item{list_title}{unique identidier for each hint}
+\item{hint_title_prefix}{string that added to each hint_title to the left side}
 
-\item{hint_id}{unique identidier for each hint}
+\item{hint_title_suffix}{string that added to each hint_title to the right side}
 
-\item{hint_prefix}{string that added to each hint_title to the left side}
+\item{list_title}{unique identidier for each hint}
 
-\item{hint_suffix}{string that added to each hint_title to the right side}
+\item{hint_id}{unique identidier for each hint}
 }
 \value{
 returns the html and javascript code