apply suggestions from review

Author: simonpcouch

R/glmnet-engines.R

@@ -388,7 +388,7 @@ format_glmnet_multinom_class <- function(pred, penalty, lvl, n_obs) {
   if (!multi) {
     if (length(penalty) != 1) {
       cli::cli_abort(c(
-        "{.var penalty} should be a single numeric value.",
+        "{.arg penalty} should be a single numeric value.",
         "i" = "{.fn multi_predict} can be used to get multiple predictions per row of data."
       ))
     }

R/logistic_reg.R

@@ -98,7 +98,7 @@ translate.logistic_reg <- function(x, engine = x$engine, ...) {
         } else if (quo_get_expr(x$args$mixture) == 1) {
           arg_vals$type <- 6      ## lasso
         } else {
-          cli::cli_abort("For the LiblineaR engine, {.var mixture} must be 0 or 1.")
+          cli::cli_abort("For the LiblineaR engine, {.arg mixture} must be 0 or 1.")
         }
     }
     x$method$fit$args <- arg_vals

R/mlp.R

@@ -196,7 +196,7 @@ keras_mlp <-
 
     if (penalty > 0 & dropout > 0) {
       cli::cli_abort("Please use either dropout or weight decay.", call = NULL)
-      }
+    }
     if (!is.matrix(x)) {
       x <- as.matrix(x)
     }