bug#17345: 24.4.50; some into clauses in cl-loop badly font-locked

[Stefan Monnier]

> in cl-loop "into" and following and even sometimes previous paren is
> font-locked with font-lock-comment-face:

> --8<---------------cut here---------------start------------->8---
>           and collect (if (fboundp 'package-desc-full-name)
>                           id
>                         (cons (symbol-name (car id))
>                               (package-version-join (cdr id)))) into 
> delete-list
>                                                               
> ^^^^^^^^^^^^^^^^^^
>                                                               
> font-lock-comment-face
> --8<---------------cut here---------------end--------------->8---

That should be font-lock-warning-face, and it should come with a tooltip
attempting the succinctly explain the "problem".

It's just a style warning, that your indentation makes it look like "into
delete-list" is an argument to `cons' rather than to the surrounding
`cl-loop'.


        Stefan