summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorNicolas Goaziou <mail@nicolasgoaziou.fr>2020-02-18 02:45:35 +0100
committerNicolas Goaziou <mail@nicolasgoaziou.fr>2020-02-19 18:42:50 +0100
commit8c4e270df280a08b7e61295712c86246088146ba (patch)
tree59de485ab4a6704ca44c7919f88c104b942d1073
parentf4bed78a19516d80b50045616d04887b81e2d5b4 (diff)
downloadorg-mode-8c4e270df280a08b7e61295712c86246088146ba.tar.gz
ol: Refuse to define reserved internal link types
* lisp/ol.el (org-link-set-parameters): Raise an error when trying to define reserved internal link types.
-rw-r--r--lisp/ol.el2
1 files changed, 2 insertions, 0 deletions
diff --git a/lisp/ol.el b/lisp/ol.el
index ea559a7..4a05bc6 100644
--- a/lisp/ol.el
+++ b/lisp/ol.el
@@ -749,6 +749,8 @@ TYPE is a string and KEY is a plist keyword. See
"Set link TYPE properties to PARAMETERS.
PARAMETERS should be keyword value pairs. See
`org-link-parameters' for supported keys."
+ (when (member type '("coderef" "custom-id" "fuzzy" "radio"))
+ (error "Cannot override reserved link type: %S" type))
(let ((data (assoc type org-link-parameters)))
(if data (setcdr data (org-combine-plists (cdr data) parameters))
(push (cons type parameters) org-link-parameters)