From: Simon Marshall <simon@gnu.org>
Date: Sat, 16 Nov 1996 13:42:45 +0000 (+0000)
Subject: Use simpler fn.
X-Git-Tag: emacs-20.1~3362
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=d3aadf0b0c33b32b3da52c787a55ff9fe05d8d92;p=emacs.git

Use simpler fn.
---

diff --git a/lisp/progmodes/simula.el b/lisp/progmodes/simula.el
index bf4fec8c465..c4de80bfd61 100644
--- a/lisp/progmodes/simula.el
+++ b/lisp/progmodes/simula.el
@@ -192,7 +192,7 @@ for SIMULA mode to function correctly.")
     (list (concat "\\<\\(array\\|boolean\\|character\\|integer\\|"
 		  "long\\|name\\|real\\|short\\|text\\|value\\)\\>"
 		  "\\([ \t]+\\sw+\\>\\)*")
-	  '(font-lock-match-c++-style-declaration-item-and-skip-to-next
+	  '(font-lock-match-c-style-declaration-item-and-skip-to-next
 	    ;; Start with point after all type specifiers.
 	    (goto-char (or (match-beginning 2) (match-end 1)))
 	    ;; Finish with point after first type specifier.
@@ -203,7 +203,7 @@ for SIMULA mode to function correctly.")
     ;; Object references and their declarations.
     '("\\<\\(ref\\)\\>[ \t]*\\((\\(\\sw+\\))\\)?"
       (3 font-lock-function-name-face nil t)
-      (font-lock-match-c++-style-declaration-item-and-skip-to-next nil nil
+      (font-lock-match-c-style-declaration-item-and-skip-to-next nil nil
        (1 font-lock-variable-name-face)))
     ))
   "Gaudy level highlighting for Simula mode.")