diff --git a/bin/cdhit_wrapper.R b/bin/cdhit_wrapper.R
index fd2ce49..070cb62 100644
--- a/bin/cdhit_wrapper.R
+++ b/bin/cdhit_wrapper.R
@@ -11,7 +11,7 @@ option_list <- list(
 )
 
 opt_parser <- OptionParser(option_list = option_list, 
-                           description = "Reduce sequences to frequent regions.")
+                           description = "CD-HIT-EST Wrapper function.")
 
 opt <- parse_args(opt_parser)