diff --git a/scripts/find_issue.R b/scripts/find_issue.R
index 3053c6f1..366ddd8c 100644
--- a/scripts/find_issue.R
+++ b/scripts/find_issue.R
@@ -24,7 +24,7 @@ option_list <- list(
 )
 
 # Print out the result
-cat(unlist(sessionInfo()))
+message(unlist(sessionInfo()))
 
 # Read the arguments passed
 opt_parser <- optparse::OptionParser(option_list = option_list)