[elpa] externals/orderless 2eed576588 1/4: Generate shorter docstrings

[ELPA Syncer]

branch: externals/orderless
commit 2eed57658855172eb1797c28d78263e46c009692
Author: Daniel Mendler <mail@daniel-mendler.de>
Commit: Daniel Mendler <mail@daniel-mendler.de>

    Generate shorter docstrings
    
    I am using relatively long names for the modified orderless completion 
styles in
    my configuration, e.g., orderless+literal+initialism. Try to generate 
shorter
    docstrings to avoid warnings on Emacs 28.
---
 orderless.el | 9 +++++----
 1 file changed, 5 insertions(+), 4 deletions(-)

diff --git a/orderless.el b/orderless.el
index 9dc233c11f..c6012e9f36 100644
--- a/orderless.el
+++ b/orderless.el
@@ -469,10 +469,11 @@ string for the completion style."
   (let* ((fn-name (lambda (string) (intern (concat (symbol-name name) 
string))))
          (try-completion  (funcall fn-name "-try-completion"))
          (all-completions (funcall fn-name "-all-completions"))
-         (doc-fmt "`%s' function for the %s completion style.
-This configures orderless according to the %s completion style and
-delegates to `orderless-%s'.")
-         (fn-doc (lambda (fn) (format doc-fmt fn name name fn))))
+         (doc-fmt "`%s' function for the %s style.
+This function delegates to `orderless-%s'.
+The orderless configuration is locally modified
+specifically for the %s style.")
+         (fn-doc (lambda (fn) (format doc-fmt fn name fn name name))))
   `(progn
      (defun ,try-completion (string table pred point)
        ,(funcall fn-doc "try-completion")