about summary refs log tree commit diff stats
diff options
context:
space:
mode:
-rw-r--r--init.el2
-rw-r--r--lisp/acdw.el10
2 files changed, 11 insertions, 1 deletions
diff --git a/init.el b/init.el index 478b735..f5b8ab3 100644 --- a/init.el +++ b/init.el
@@ -589,7 +589,7 @@
589 org-fontify-done-headline t 589 org-fontify-done-headline t
590 org-fontify-quote-and-verse-blocks t 590 org-fontify-quote-and-verse-blocks t
591 org-fontify-whole-heading-line t 591 org-fontify-whole-heading-line t
592 org-hide-emphasis-markers nil 592 org-hide-emphasis-markers t
593 org-html-coding-system 'utf-8-unix 593 org-html-coding-system 'utf-8-unix
594 org-image-actual-width (list (* (window-font-width) 594 org-image-actual-width (list (* (window-font-width)
595 (- fill-column 8))) 595 (- fill-column 8)))
diff --git a/lisp/acdw.el b/lisp/acdw.el index 6707e76..3052976 100644 --- a/lisp/acdw.el +++ b/lisp/acdw.el
@@ -447,5 +447,15 @@ sort order."
447 #'end-of-line 447 #'end-of-line
448 #'beginning-of-line-text))))) 448 #'beginning-of-line-text)))))
449 449
450(defun +crm-indicator (args)
451 "AROUND advice for `completing-read-multiple'."
452 ;; [[https://github.com/minad/vertico/blob/8ab2cddf3a1fb8799611b1d35118bf579aaf3154/README.org][from vertico's README]]
453 (cons (format "[CRM%s] %s"
454 (replace-regexp-in-string
455 "\\`\\[.*?]\\*\\|\\[.*?]\\*\\'" ""
456 crm-separator)
457 (car args))
458 (cdr args)))
459
450(provide 'acdw) 460(provide 'acdw)
451;;; acdw.el ends here 461;;; acdw.el ends here