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 + + * mail/pmaildesc.el (pmail-desc-get-match-index): + Fix malformed let binding. + 2008-09-01 Paul Reilly * 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)))