Remove trailing comma in glue::glue()

This trailing comma has no functional role and seems to be at the origin of carpentries#149, as reported in tidyverse/glue#320.

R/fix_links.R

@@ -117,7 +117,7 @@ make_link_patterns <- function(ns = "md:") {
   predicate <- gsb("(<ctext('({{')> and <ctext('}}')>)")
   asis_nodes <- "text[@asis][text()=']']"
   destination <- glue::glue(
-    ".//{ns}{asis_nodes}/following-sibling::{ns}text[{predicate}]",
+    ".//{ns}{asis_nodes}/following-sibling::{ns}text[{predicate}]"
   )
   return(destination)
 }