branch: externals/denote-sequence
commit d9de4d7e4d8b25f17a9940cd2c0040c75d5d7c9f
Author: Protesilaos Stavrou <[email protected]>
Commit: Protesilaos Stavrou <[email protected]>
Add error handling to denote-sequence-make-conversion
---
denote-sequence.el | 2 ++
1 file changed, 2 insertions(+)
diff --git a/denote-sequence.el b/denote-sequence.el
index 07d8ef067f..7245e56843 100644
--- a/denote-sequence.el
+++ b/denote-sequence.el
@@ -421,6 +421,8 @@ If SEQUENCE conforms with `denote-sequence-alphanumeric-p',
return it as-is."
(defun denote-sequence-make-conversion (string target-scheme &optional
string-is-partial-sequence)
"Convert STRING to the given sequencing TARGET-SCHEME.
With optional STRING-IS-PARTIAL-SEQUENCE interpret STRING accordingly."
+ (unless (memq target-scheme denote-sequence-schemes)
+ (error "The TARGET-SCHEME can only be one among the
`denote-sequence-schemes'"))
(cond
(string-is-partial-sequence
(if (eq target-scheme 'numeric)
