From 17a873c585321b47bcbf46612902245c49c422de Mon Sep 17 00:00:00 2001
From: Stefan Monnier <monnier@iro.umontreal.ca>
Date: Thu, 1 May 2014 12:14:03 -0400
Subject: * lisp/emacs-lisp/lisp-mode.el (lisp--match-hidden-arg): Only
 highlight past the last consecutive closing paren.

Fixes: debbugs:17345
---
 lisp/emacs-lisp/lisp-mode.el | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

(limited to 'lisp/emacs-lisp/lisp-mode.el')

diff --git a/lisp/emacs-lisp/lisp-mode.el b/lisp/emacs-lisp/lisp-mode.el
index 7e00d0b2cf9..690aa3d7460 100644
--- a/lisp/emacs-lisp/lisp-mode.el
+++ b/lisp/emacs-lisp/lisp-mode.el
@@ -163,8 +163,9 @@ It has `lisp-mode-abbrev-table' as its parent."
         (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))
-- 
cgit v1.2.3