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

[Stefan Monnier]

> Yes probably but the last paren before "into" should not be highlighted IMO.

Makes sense, indeed.  I installed the patch below which should do that.
Do you find it resolves this bug report satisfactorily?


        Stefan


=== modified file 'lisp/emacs-lisp/lisp-mode.el'
--- lisp/emacs-lisp/lisp-mode.el        2014-04-25 16:11:07 +0000
+++ lisp/emacs-lisp/lisp-mode.el        2014-05-01 16:11:59 +0000
@@ -163,8 +163,9 @@
         (let ((ppss (parse-partial-sexp (line-beginning-position)
                                         (line-end-position)
                                         -1)))
+          (skip-syntax-forward " )")
           (if (or (>= (car ppss) 0)
-                  (looking-at "[]) \t]*\\(;\\|$\\)"))
+                  (looking-at ";\\|$"))
               (progn
                 (forward-line 1)
                 (< (point) limit))