[elpa] externals/el-search 985ca3c 312/332: [el-search] Add "List patterns" menu item

[Stefan Monnier]

branch: externals/el-search
commit 985ca3cfdba9d22d37eaf4c7cbf21e4da46b3a18
Author: Michael Heerdegen <michael_heerdegen@web.de>
Commit: Michael Heerdegen <michael_heerdegen@web.de>

    [el-search] Add "List patterns" menu item
    
    * packages/el-search/el-search.el (el-search--make-docstring): Improve
    wording.
---
 el-search.el | 7 +++++--
 1 file changed, 5 insertions(+), 2 deletions(-)

diff --git a/el-search.el b/el-search.el
index 1bad6a7..eefb03b 100644
--- a/el-search.el
+++ b/el-search.el
@@ -1200,7 +1200,9 @@ expander functions.")
          (ud (help-split-fundoc main name)))
     (with-temp-buffer
       (insert (or (cdr ud) main)
-              "\n\nThe following additional pattern types are currently 
defined:")
+              "\n\n\
+In addition to the standard `pcase' patterns the following
+pattern types are defined:")
       (mapc
        (pcase-lambda (`(,symbol . ,fun))
          (unless (string-match-p "\\`[-_]\\|--" (symbol-name symbol)) ;Let's 
consider these "internal"
@@ -4925,7 +4927,8 @@ Reuse already given input."
            (call-interactively #'el-search-directory)))]
      ["Search 'load-path'"         el-search-load-path]
      ["Search Emacs Elisp Sources" el-search-emacs-elisp-sources]
-     ["Search Elisp Buffers"       el-search-buffers]))
+     ["Search Elisp Buffers"       el-search-buffers]
+     ["List Patterns"              el-search-list-defined-patterns]))
 
   (easy-menu-add-item
    (lookup-key emacs-lisp-mode-map [menu-bar]) '("Emacs-Lisp")