branch: externals/vertico
commit 8ab2cddf3a1fb8799611b1d35118bf579aaf3154
Author: Daniel Mendler <m...@daniel-mendler.de>
Commit: Daniel Mendler <m...@daniel-mendler.de>
README: Expand crm indicator configuration
---
README.org | 8 +++++++-
1 file changed, 7 insertions(+), 1 deletion(-)
diff --git a/README.org b/README.org
index a9ab23341f..4c9c2fd236 100644
--- a/README.org
+++ b/README.org
@@ -93,8 +93,14 @@ configuration:
(use-package emacs
:init
;; Add prompt indicator to `completing-read-multiple'.
+ ;; We display [CRM<separator>], e.g., [CRM,] if the separator is a comma.
(defun crm-indicator (args)
- (cons (concat "[CRM] " (car args)) (cdr args)))
+ (cons (format "[CRM%s] %s"
+ (replace-regexp-in-string
+ "\\`\\[.*?]\\*\\|\\[.*?]\\*\\'" ""
+ crm-separator)
+ (car args))
+ (cdr args)))
(advice-add #'completing-read-multiple :filter-args #'crm-indicator)
;; Do not allow the cursor in the minibuffer prompt
