Rename orderless-dispatch to orderless--dispatch

The function is internal.

3 files changed, 6 insertions, 5 deletions

diff --git a/README.org b/README.org
index 661b2d2..6c6a21d 100644
--- a/README.org
+++ b/README.org
@@ -197,7 +197,7 @@ regexp styles.
  A style dispatcher can either decline to handle the input string or
  component, or it can return which matching styles to use. It can
  also, if desired, additionally return a new string to use in place of
- the given one. Consult the documentation of =orderless-dispatch= for
+ the given one. Consult the documentation of =orderless--dispatch= for
  full details.
 
  As an example of writing your own dispatchers, say you wanted the
diff --git a/orderless.el b/orderless.el
index fdeb38c..7280e43 100644
--- a/orderless.el
+++ b/orderless.el
@@ -186,7 +186,7 @@ the 0-based index of the component and the total number of
 components.  It can decide what matching styles to use for the
 component and optionally replace the component with a different
 string, or it can decline to handle the component leaving it for
-future dispatchers.  For details see `orderless-dispatch'.
+future dispatchers.  For details see `orderless--dispatch'.
 
 For example, a style dispatcher could arrange for the first
 component to match as an initialism and subsequent components to
@@ -341,7 +341,8 @@ converted to a list of regexps according to the value of
                   string 'fixedcase 'literal)
                  " +" t)))
 
-(defun orderless-dispatch (dispatchers default string &rest args)
+(define-obsolete-function-alias 'orderless-dispatch 'orderless--dispatch "1.0")
+(defun orderless--dispatch (dispatchers default string &rest args)
   "Run DISPATCHERS to compute matching styles for STRING.
 
 A style dispatcher is a function that takes a string and possibly
@@ -420,7 +421,7 @@ non-nil return a pair of a predicate function and the regexps."
                        (split-string pattern orderless-component-separator t))
    with total = (length components)
    for comp in components and idx from 0
-   for (newstyles . newcomp) = (orderless-dispatch dispatchers styles comp idx total)
+   for (newstyles . newcomp) = (orderless--dispatch dispatchers styles comp idx total)
    when (functionp newstyles) do (setq newstyles (list newstyles))
    for (pred . regexps) = (orderless--component-compiler newcomp newstyles)
    when regexps collect regexps into regexps-res
diff --git a/orderless.texi b/orderless.texi
index 8afe2e9..487fc0a 100644
--- a/orderless.texi
+++ b/orderless.texi
@@ -249,7 +249,7 @@ that specific component, overriding the default matching styles.
 A style dispatcher can either decline to handle the input string or
 component, or it can return which matching styles to use. It can
 also, if desired, additionally return a new string to use in place of
-the given one. Consult the documentation of @samp{orderless-dispatch} for
+the given one. Consult the documentation of @samp{orderless--dispatch} for
 full details.
 
 As an example of writing your own dispatchers, say you wanted the