From 19b43ada7e304221680df6e6fb53383d9a367d7c Mon Sep 17 00:00:00 2001 From: Yuchen Pei Date: Thu, 29 Sep 2022 10:43:50 +1000 Subject: cut off component in minibuffer if too long --- hcel-results.el | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) (limited to 'hcel-results.el') diff --git a/hcel-results.el b/hcel-results.el index 58c6f31..275cab9 100644 --- a/hcel-results.el +++ b/hcel-results.el @@ -332,6 +332,7 @@ Start by choosing a package." (defvar hcel-ids--minibuffer-saved-query nil) (defvar hcel-ids--minibuffer-saved-results nil) (defvar hcel-ids--minibuffer-selected nil) +(defvar hcel-ids-minibuffer-component-max-len 80) (defun hcel-ids--affixation-internal (scope items) (let ((results @@ -344,7 +345,9 @@ Start by choosing a package." (format " :: %s" (hcel-render-components - (alist-get 'components (alist-get 'idType info)))) + (alist-get 'components (alist-get 'idType info)) + nil + hcel-ids-minibuffer-component-max-len)) 'face 'completions-annotations)) (prefix (propertize -- cgit v1.2.3