diff --git a/README.md b/README.md
index 8d3449478b919c04c86737fa799e9ef615c35ba8..4967b1fab846521941b97ccf00d0e5d3579c1919 100644
--- a/README.md
+++ b/README.md
@@ -5,6 +5,11 @@ Source the cute_little_functions.R into R/RStudio to have the functions availabl
 
 WHAT'S NEW IN 
 
+v1.7:
+
+1) Debugged
+
+
 v1.6:
 
 1) Debugged
diff --git a/r_debugging_tools.R b/r_debugging_tools.R
index 2b5c51b4cd2be40cde1b5967e3cb22d90174ea6c..5cde3786a29251af77224b088e755753fbcaddce 100644
--- a/r_debugging_tools.R
+++ b/r_debugging_tools.R
@@ -1,6 +1,6 @@
 ################################################################
 ##                                                            ##
-##     R DEBUGGING TOOLS v1.5                                 ##
+##     R DEBUGGING TOOLS v1.7                                 ##
 ##                                                            ##
 ##     Gael A. Millot                                         ##
 ##                                                            ##
@@ -22,7 +22,8 @@ default.arg.list <- formals(fun = sys.function(sys.parent(n = 2))) # list of all
 
 arg.without.default.value.log <- sapply(default.arg.list, is.symbol) & sapply(sapply(default.arg.list, as.character), identical, "") # logical indicating argument without default values (these are typeof "symbol" and class "name" and empty character
 name.or.empty.default.val.arg.log <- sapply(default.arg.list, FUN = "class") == "name"
-arg.with.fun.as.default.value.log <- sapply(default.arg.list, class) %in% c("function", "call") & ! name.or.empty.default.val.arg.log # arguments with function as default values 
+arg.with.fun.as.default.value.log <- sapply(default.arg.list, FUN = "class") %in% c("function", "call") & ! name.or.empty.default.val.arg.log # arguments with function as default values 
+
 
 if(length(name.or.empty.default.val.arg.log) != length(arg.without.default.value.log)){
     stop(paste0("\n\n================\n\nINTERNAL ERROR IN str_basic_arg_check_dev IN ", function.name.local,". CODE MUST BE MODIFED\n\n================\n\n"))