branch: externals/embark
commit 6c6d912f8a4358150f113f100289bf25975c187e
Author: Daniel Mendler <m...@daniel-mendler.de>
Commit: Daniel Mendler <m...@daniel-mendler.de>
Prevent Tramp slowdown in Eldoc functions
Eldoc functions are called when moving point around. Some target finders use
ffap which call file name handlers. This can lead to unpredictable
latencies due
to Tramp, which is not acceptable for point movement.
---
embark.el | 6 ++++--
1 file changed, 4 insertions(+), 2 deletions(-)
diff --git a/embark.el b/embark.el
index f7d4db7444..c01051b2b5 100644
--- a/embark.el
+++ b/embark.el
@@ -1123,7 +1123,8 @@ If CYCLE is non-nil bind `embark-cycle'."
This function uses the eldoc REPORT callback and is meant to be
added to `eldoc-documentation-functions'."
(when-let (((not (minibufferp)))
- (target (car (embark--targets))))
+ (target (let (file-name-handler-alist) ;; Prevent Tramp slowdown.
+ (car (embark--targets)))))
(funcall report
(format "Embark on %s ‘%s’"
(plist-get target :type)
@@ -1135,7 +1136,8 @@ added to `eldoc-documentation-functions'."
This function uses the eldoc REPORT callback and is meant to be
added to `eldoc-documentation-functions'."
(when-let (((not (minibufferp)))
- (targets (embark--targets)))
+ (targets (let (file-name-handler-alist) ;; Prevent Tramp slowdown.
+ (embark--targets))))
(funcall report
(format "Embark target types: %s"
(mapconcat
