diff --git a/R/link_function.R b/R/link_function.R
index 282cb818c..a696c6c98 100644
--- a/R/link_function.R
+++ b/R/link_function.R
@@ -61,8 +61,7 @@ link_function.default <- function(x, ...) {
   }
   # if all fails, force default link
   if (is.null(out) && !is.null(default_link)) {
-    out <- switch(
-      default_link,
+    out <- switch(default_link,
       identity = .safe(stats::gaussian(link = "identity")$linkfun),
       .safe(stats::make.link(link = default_link)$linkfun)
     )
diff --git a/R/link_inverse.R b/R/link_inverse.R
index 7c9e46632..44de28207 100644
--- a/R/link_inverse.R
+++ b/R/link_inverse.R
@@ -68,8 +68,7 @@ link_inverse.default <- function(x, ...) {
   }
   # if all fails, force default link
   if (is.null(out) && !is.null(default_link)) {
-    out <- switch(
-      default_link,
+    out <- switch(default_link,
       identity = .safe(stats::gaussian(link = "identity")$linkinv),
       .safe(stats::make.link(link = default_link)$linkinv)
     )