lisp/emacs-lisp/crm.el (crm-complete-and-exit): Simplify docstringHEADmaster

1 files changed, 4 insertions, 10 deletions

diff --git a/lisp/emacs-lisp/crm.el b/lisp/emacs-lisp/crm.el
index 39a01490365..b68d3d55525 100644
--- a/lisp/emacs-lisp/crm.el
+++ b/lisp/emacs-lisp/crm.el
@@ -193,16 +193,10 @@ Like `minibuffer-complete-word' but for `completing-read-multiple'."
     (completion-in-region--single-word beg end)))
 
 (defun crm-complete-and-exit (&optional no-exit)
-  "If all of the minibuffer elements are valid completions then exit.
-All elements in the minibuffer must match.  If there is a mismatch, move point
-to the location of mismatch and do not exit.
-
-If a completion candidate is selected in the *Completions* buffer, it
-will be inserted in the minibuffer first.  If NO-EXIT is non-nil, don't
-actually exit the minibuffer, just insert the selected completion if
-any.
-
-This function is modeled after `minibuffer-complete-and-exit'."
+  "Exit if all of the minibuffer elements are valid completions.
+Otherwise, try to complete the minibuffer contents.
+This behaves like `minibuffer-complete-and-exit' (which see),
+adjusted for the presence of multiple elements."
   (interactive "P")
   (when (completion--selected-candidate)
     (minibuffer-choose-completion t t))