summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorNicolas Goaziou <mail@nicolasgoaziou.fr>2019-03-10 14:50:53 +0100
committerNicolas Goaziou <mail@nicolasgoaziou.fr>2019-03-10 18:00:36 +0100
commitc3d75b4aa26621e9ff02bc55d8542e1d249af9c9 (patch)
tree9711d3daaf697a3df0fb5a1de5f152a4d1760fa0
parent1c936fd2aceada93dc0c8736287c1e117f7dd0ee (diff)
downloadorg-mode-c3d75b4aa26621e9ff02bc55d8542e1d249af9c9.tar.gz
ol: Remove `org-link-re-with-space(2|3)?' variables
* lisp/ol.el (org-link-re-with-space): (org-link-re-with-space2): (org-link-re-with-space3): Remove variables. (org-link-make-regexps): Do not set removed variables. These variables are not accurate. They are not used throughout the code base either.
-rw-r--r--lisp/ol.el23
1 files changed, 0 insertions, 23 deletions
diff --git a/lisp/ol.el b/lisp/ol.el
index 6f33771..094f41e 100644
--- a/lisp/ol.el
+++ b/lisp/ol.el
@@ -458,15 +458,6 @@ links more efficient."
(defvar org-link-types-re nil
"Matches a link that has a url-like prefix like \"http:\"")
-(defvar org-link-re-with-space nil
- "Matches a link with spaces, optional angular brackets around it.")
-
-(defvar org-link-re-with-space2 nil
- "Matches a link with spaces, optional angular brackets around it.")
-
-(defvar org-link-re-with-space3 nil
- "Matches a link with spaces, only for internal part in bracket links.")
-
(defvar org-link-angle-re nil
"Matches link with angular brackets, spaces are allowed.")
@@ -715,20 +706,6 @@ This should be called after the variable `org-link-parameters' has changed."
(let ((types-re (regexp-opt (org-link-types) t)))
(setq org-link-types-re
(concat "\\`" types-re ":")
- org-link-re-with-space
- (concat "<?" types-re ":"
- "\\([^" org-link--forbidden-chars " ]"
- "[^" org-link--forbidden-chars "]*"
- "[^" org-link--forbidden-chars " ]\\)>?")
- org-link-re-with-space2
- (concat "<?" types-re ":"
- "\\([^" org-link--forbidden-chars " ]"
- "[^\t\n\r]*"
- "[^" org-link--forbidden-chars " ]\\)>?")
- org-link-re-with-space3
- (concat "<?" types-re ":"
- "\\([^" org-link--forbidden-chars " ]"
- "[^\t\n\r]*\\)")
org-link-angle-re
(format "<%s:\\([^>\n]*\\(?:\n[ \t]*[^> \t\n][^>\n]*\\)*\\)>"
types-re)