branch: elpa/hyperdrive
commit daee6699895b19367c1cc9af63a3451b69d69c74
Author: Joseph Turner <jos...@ushin.org>
Commit: Joseph Turner <jos...@ushin.org>
Fix: (hyperdrive-url-entry) Check that textsec-suspicious-p is bound
---
hyperdrive-lib.el | 3 ++-
1 file changed, 2 insertions(+), 1 deletion(-)
diff --git a/hyperdrive-lib.el b/hyperdrive-lib.el
index 5934efc0d1..318ceeb650 100644
--- a/hyperdrive-lib.el
+++ b/hyperdrive-lib.el
@@ -250,7 +250,8 @@ empty public-key slot."
(hyperdrive (pcase host
;; FIXME: Duplicate hyperdrive (one has domain
and nothing else)
((rx ".") ; Assume host is a DNSLink domain. See
code for <https://github.com/RangerMauve/hyper-sdk#sdkget>.
- (when (textsec-suspicious-p host 'domain)
+ (when (and (fboundp #'textsec-suspicious-p)
+ (textsec-suspicious-p host 'domain))
;; Check DNSLink domains for suspicious
characters; don't bother
;; checking public keys since they're not
recognizable anyway.
(unless (y-or-n-p
