From: Eli Zaretskii <eliz@gnu.org>
Date: Tue, 20 Feb 2024 17:15:38 +0000 (+0200)
Subject: ; * lisp/emacs-lisp/pcase.el (pcase-let*, pcase-let): Another doc fix.
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=5e89929310304ed78b7a51ef91a61903cc7d9e61;p=emacs.git

; * lisp/emacs-lisp/pcase.el (pcase-let*, pcase-let): Another doc fix.

(cherry picked from commit 2eb85a9de1a5068d09b21464601dbd3263e55c85)
---

diff --git a/lisp/emacs-lisp/pcase.el b/lisp/emacs-lisp/pcase.el
index 603a09c702f..40d917795e3 100644
--- a/lisp/emacs-lisp/pcase.el
+++ b/lisp/emacs-lisp/pcase.el
@@ -285,8 +285,8 @@ As with `pcase-let', BINDINGS are of the form (PATTERN EXP), but the
 EXP in each binding in BINDINGS can use the results of the destructuring
 bindings that precede it in BINDINGS' order.
 
-Each EXP should match (i.e. be of compatible structure) its
-respective PATTERN; a mismatch may signal an error or may go
+Each EXP should match its respective PATTERN (i.e. be of structure
+compatible to PATTERN); a mismatch may signal an error or may go
 undetected, binding variables to arbitrary values, such as nil."
   (declare (indent 1)
            (debug ((&rest (pcase-PAT &optional form)) body)))
@@ -307,8 +307,8 @@ All EXPs are evaluated first, and then used to perform destructuring
 bindings by matching each EXP against its respective PATTERN.  Then
 BODY is evaluated with those bindings in effect.
 
-Each EXP should match (i.e. be of compatible structure) its
-respective PATTERN; a mismatch may signal an error or may go
+Each EXP should match its respective PATTERN (i.e. be of structure
+compatible to PATTERN); a mismatch may signal an error or may go
 undetected, binding variables to arbitrary values, such as nil."
   (declare (indent 1) (debug pcase-let*))
   (if (null (cdr bindings))