From 77d600df062fd9fcf8dcda43d5fbb00d989eacfa Mon Sep 17 00:00:00 2001
From: olivroy <olivierroy71@hotmail.com>
Date: Wed, 15 May 2024 21:39:02 -0400
Subject: [PATCH] Also allow `.` to be a delimiter for a link.

---
 R/link-elements.R | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/R/link-elements.R b/R/link-elements.R
index 03ba40f..1a4f90d 100644
--- a/R/link-elements.R
+++ b/R/link-elements.R
@@ -99,7 +99,7 @@ markup_href <- function(x) {
 common_regex <- function(which) {
   x <- c(
     # usage of double negation will make it work
-    md_url = "(?<!\\{\\.href\\s)(\\[[^\\[\\]]+\\])(\\(https[^,\\s]+\\)(?![^\\s,\\:;$\\)]))",
+    md_url = "(?<!\\{\\.href\\s)(\\[[^\\[\\]]+\\])(\\(https[^,\\s]+\\)(?![^\\s,\\:;\\.$\\)]))",
     gh_issue = "([[:alpha:]][[:graph:]]+/[^#\\s]+)#(\\d+)"
   )
   unname(x[which])