aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorSimon Marshall1996-07-13 11:12:25 +0000
committerSimon Marshall1996-07-13 11:12:25 +0000
commit56a2f57a0d5ef7571ab523db10b187c3db65986c (patch)
treec07d4adb9012d4425df866fae4d760f07dac6b65
parent5f25660ca75a46c3f6b42ffd0b685cf63bbcc062 (diff)
downloademacs-56a2f57a0d5ef7571ab523db10b187c3db65986c.tar.gz
emacs-56a2f57a0d5ef7571ab523db10b187c3db65986c.zip
Make sure font-lock-match-c++-style-declaration-item-and-skip-to-next only skips commas.
-rw-r--r--lisp/font-lock.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/font-lock.el b/lisp/font-lock.el
index 2e840bfc7d1..ac9978c1718 100644
--- a/lisp/font-lock.el
+++ b/lisp/font-lock.el
@@ -1568,9 +1568,9 @@ the face is also set; its value is the face name."
1568 (narrow-to-region (point-min) limit) 1568 (narrow-to-region (point-min) limit)
1569 (goto-char (match-end 1)) 1569 (goto-char (match-end 1))
1570 ;; Move over any item value, etc., to the next item. 1570 ;; Move over any item value, etc., to the next item.
1571 (while (not (looking-at "[ \t]*\\(,\\|$\\)")) 1571 (while (not (looking-at "[ \t]*\\(\\(,\\)\\|;\\|$\\)"))
1572 (goto-char (or (scan-sexps (point) 1) (point-max)))) 1572 (goto-char (or (scan-sexps (point) 1) (point-max))))
1573 (goto-char (match-end 0))) 1573 (goto-char (match-end 2)))
1574 (error t))))) 1574 (error t)))))
1575 1575
1576(let ((c-keywords 1576(let ((c-keywords