From: Eli Zaretskii <eliz@gnu.org>
Date: Wed, 5 Dec 2001 18:41:34 +0000 (+0000)
Subject: (cwarn-font-lock-match-assignment-in-expression):
X-Git-Tag: ttn-vms-21-2-B4~17896
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=a17c90638b08f5d3f2c4167ff7c93aa72f10e84d;p=emacs.git

(cwarn-font-lock-match-assignment-in-expression):
Add shift-assignment operators to those highlighted, and highlight
the whole operator rather than just the "=".  From Broadey Kevin
<Kevin.Broadey@motorola.com>.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index e20bdca5859..e5a5c011d10 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,10 @@
+2001-12-05  Eli Zaretskii  <eliz@is.elta.co.il>
+
+	* progmodes/cwarn.el (cwarn-font-lock-match-assignment-in-expression):
+	Add shift-assignment operators to those highlighted, and highlight
+	the whole operator rather than just the "=".  From Broadey Kevin
+	<Kevin.Broadey@motorola.com>.
+
 2001-12-04  Juanma Barranquero  <lektu@terra.es>
 
 	* files.el (save-abbrevs, save-some-buffers): Don't ask the user
diff --git a/lisp/progmodes/cwarn.el b/lisp/progmodes/cwarn.el
index ebc65edf076..b1f890dea93 100644
--- a/lisp/progmodes/cwarn.el
+++ b/lisp/progmodes/cwarn.el
@@ -394,7 +394,9 @@ brace."
   (let ((res nil))
     (while
 	(progn
-	  (setq res (re-search-forward "[^!<>=]\\(=\\)[^=]" limit t))
+	  (setq res (re-search-forward
+		     "[^!<>=]\\(\\([-+*/%&^|]\\|<<\\|>>\\)?=\\)[^=]"
+		     limit t))
 	  (and res
 	       (save-excursion
 		 (goto-char (match-beginning 1))