[elpa] externals/consult 1745b97acd: Do not preview remote files by default (Fix #806)

[ELPA Syncer]

branch: externals/consult
commit 1745b97acd48368ce295166f8fe773bdc832e220
Author: Daniel Mendler <mail@daniel-mendler.de>
Commit: Daniel Mendler <mail@daniel-mendler.de>

    Do not preview remote files by default (Fix #806)
---
 CHANGELOG.org | 1 +
 consult.el    | 3 ++-
 2 files changed, 3 insertions(+), 1 deletion(-)

diff --git a/CHANGELOG.org b/CHANGELOG.org
index c86eafc93e..659b1ccc58 100644
--- a/CHANGELOG.org
+++ b/CHANGELOG.org
@@ -14,6 +14,7 @@
 - The regexps in =consult-buffer-filter= are matched case sensitively now.
   Similarly, the =INCLUDE= and =EXCLUDE= arguments of =consult--buffer-query= 
are also
   case sensitive.
+- Do not preview remote files by default, see =consult-preview-excluded-files=.
 
 * Version 0.34 (2023-04-21)
 
diff --git a/consult.el b/consult.el
index 5855e4da95..558a570bc4 100644
--- a/consult.el
+++ b/consult.el
@@ -321,7 +321,8 @@ individual keys must be strings accepted by `key-valid-p'."
   "Number of files to keep open at once during preview."
   :type 'natnum)
 
-(defcustom consult-preview-excluded-files nil
+(defcustom consult-preview-excluded-files
+  '("\\`/[^/|:]+:") ;; Do not preview remote files
   "List of regexps matched against names of files, which are not previewed."
   :type '(repeat regexp))