Re: master e7b9a6f: * lisp/mail/rfc2047.el: Use cl-lib & lexical-binding, silence warning

[Katsumi Yamaoka]

On Sun, 21 May 2017 23:19:06 -0400, Stefan Monnier wrote:
> branch: master
> commit e7b9a6fc4adc584b1c89a8e7502734d063fab2cd
>     * lisp/mail/rfc2047.el: Use cl-lib & lexical-binding, silence warning
>     (rfc2047-decode-encoded-words): Use dolist.

Now a form like the following causes an error:

(rfc2047-decode-string "=?utf-8?Q?=E3=81=82?=")

Debugger entered--Lisp error: (wrong-type-argument characterp ("utf-8" 81 
"=E3=81=82" "=?utf-8?Q?=E3=81=82?="))
  concat("あ" (("utf-8" 81 "=E3=81=82" "=?utf-8?Q?=E3=81=82?=")))
  (setq words (concat
               (or (and (setq cs (car (car rest)))
                        (condition-case code
                            (decode-coding-string (cdr (car rest)) cs)
                          (error
                           (message "%s" (error-message-string code))
                           nil)))
                   (concat (if (cdr rest) (progn " "))
                           (cdr (car rest))
                           (if (and words
                                    (not (eq ... 32)))
                               (progn " "))))
               words)
        rest (cdr rest))

Formerly `words' was initialized to nil implicitly by (pop words).