* mail/pmaildesc.el (pmail-desc-get-match-index):

  Fix malformed let binding.

2 files changed, 6 insertions, 1 deletions

diff --git a/lisp/mail/ChangeLog.pmail b/lisp/mail/ChangeLog.pmail
index ce079b80012..adbbd5a1a7d 100644
--- a/lisp/mail/ChangeLog.pmail
+++ b/lisp/mail/ChangeLog.pmail
@@ -1,3 +1,8 @@
+2008-09-02  Juanma Barranquero  <lekktu@gmail.com>
+
+        * mail/pmaildesc.el (pmail-desc-get-match-index):
+        Fix malformed let binding.
+
 2008-09-01  Paul Reilly <pmr@pajato.com>
 
         * mbox-changes/rmail.el.changes:
diff --git a/lisp/mail/pmaildesc.el b/lisp/mail/pmaildesc.el
index f2274cc23cb..a63ea5cb207 100644
--- a/lisp/mail/pmaildesc.el
+++ b/lisp/mail/pmaildesc.el
@@ -370,7 +370,7 @@ non-null will reverse the sense of the attribute test."
   "Return the index N if the associated descriptor has a matching
 attribute, nil otherwise.  The attribute value must be set if
 SENSE is nil, or unset if SENSE is non-nil."
-  (let (flag (pmail-desc-attr-p attr-index n))
+  (let ((flag (pmail-desc-attr-p attr-index n)))
     (if (or (and flag (not sense)) (and (not flag) sense))
         n
       nil)))