branch: externals/consult
commit 620b10db130fc62cf104ea1a91d6a6e38ceb8bc1
Author: Mohamed Abdelnour <[email protected]>
Commit: GitHub <[email protected]>
Fix `consult--command-split` (#386)
---
consult.el | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/consult.el b/consult.el
index 405470c..4e88a0e 100644
--- a/consult.el
+++ b/consult.el
@@ -536,7 +536,7 @@ ARGS is a list of commands or sources followed by the list
of keyword-value pair
(save-match-data
(let ((opts (when (string-match " +--\\( +\\|\\'\\)" str)
(prog1 (substring str (match-end 0))
- (setq str (substring str 0 (match-end 0)))))))
+ (setq str (substring str 0 (match-beginning 0)))))))
(unless (string-blank-p str)
;; split-string-and-unquote fails if the quotes are invalid. Ignore it.
(cons str (and opts (ignore-errors (split-string-and-unquote
opts))))))))