[elpa] externals/cape 361d0f2b0a: Add more metadata properties

[ELPA Syncer]

branch: externals/cape
commit 361d0f2b0a9f840c207d809f54dad87e52bc9c1f
Author: Daniel Mendler <mail@daniel-mendler.de>
Commit: Daniel Mendler <mail@daniel-mendler.de>

    Add more metadata properties
---
 cape.el | 10 +++++++---
 1 file changed, 7 insertions(+), 3 deletions(-)

diff --git a/cape.el b/cape.el
index c6b59bb9ae..1a46df85f5 100644
--- a/cape.el
+++ b/cape.el
@@ -345,7 +345,8 @@ string as first argument to the completion table."
   (list :company-kind (lambda (_) 'text)
         :exclusive 'no
         :display-sort-function #'identity
-        :cycle-sort-function #'identity)
+        :cycle-sort-function #'identity
+        :category 'cape-history)
   "Completion extra properties for `cape-history'.")
 
 ;;;###autoload
@@ -382,7 +383,8 @@ See also `consult-history' for a more flexible variant 
based on
 (defvar cape--file-properties
   (list :annotation-function (lambda (s) (if (string-suffix-p "/" s) " Dir" " 
File"))
         :company-kind (lambda (s) (if (string-suffix-p "/" s) 'folder 'file))
-        :exclusive 'no)
+        :exclusive 'no
+        :category 'file)
   "Completion extra properties for `cape-file'.")
 
 ;;;###autoload
@@ -706,7 +708,9 @@ If INTERACTIVE is nil the function acts like a Capf."
 
 (defvar cape--line-properties
   (list :display-sort-function #'identity
-        :cycle-sort-function #'identity)
+        :cycle-sort-function #'identity
+        :exclusive 'no
+        :category 'cape-line)
   "Completion extra properties for `cape-line'.")
 
 (defun cape--buffers-major-mode ()