# HG changeset patch
# User Stefan Monnier <monnier@iro.umontreal.ca>
# Date 1116595953 0
# Node ID 428c1f634761847aac34aeeaba3880af02c011c1
# Parent  4f78132b042bc44baa21a6279dca31e1528c44de
(vhdl-font-lock-match-item): Simplify regexp.

diff -r 4f78132b042b -r 428c1f634761 lisp/progmodes/vhdl-mode.el
--- a/lisp/progmodes/vhdl-mode.el	Fri May 20 13:28:38 2005 +0000
+++ b/lisp/progmodes/vhdl-mode.el	Fri May 20 13:32:33 2005 +0000
@@ -12364,8 +12364,8 @@
 	  (save-match-data
 	    (goto-char (match-end 1))
 	    ;; move to next item
-	    (if (looking-at "\\(\\s-*,\\)")
-		(goto-char (match-end 1))
+	    (if (looking-at "\\s-*,")
+		(goto-char (match-end 0))
 	      (end-of-line) t))))
     (error t)))
 
@@ -12736,7 +12736,7 @@
 	 '(font-lock-syntactic-keywords . vhdl-font-lock-syntactic-keywords)))
   (when (fboundp 'font-lock-unset-defaults)
     (font-lock-unset-defaults))		; not implemented in XEmacs
-  (font-lock-set-defaults)
+  (font-lock-set-defaults)              ;What for?  --Stef
   (font-lock-mode nil)
   (font-lock-mode t))