From: Simon Marshall <simon@gnu.org>
Date: Thu, 2 Mar 1995 11:20:30 +0000 (+0000)
Subject: Use font-lock-maximum-decoration when setting fortran-font-lock-keywords.
X-Git-Tag: emacs-19.34~4975
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=33308f7b9d4bb96e7c7a346b7f20d17c0699ca64;p=emacs.git

Use font-lock-maximum-decoration when setting fortran-font-lock-keywords.
---

diff --git a/lisp/progmodes/fortran.el b/lisp/progmodes/fortran.el
index f67d75a2aa6..8e9ef8277bc 100644
--- a/lisp/progmodes/fortran.el
+++ b/lisp/progmodes/fortran.el
@@ -243,7 +243,9 @@ This does fairly subdued highlighting.")
   "For consideration as a value of `fortran-font-lock-keywords'.
 This does a lot more highlighting.")
 
-(defconst fortran-font-lock-keywords fortran-font-lock-keywords-1
+(defvar fortran-font-lock-keywords (if font-lock-maximum-decoration
+					 fortran-font-lock-keywords-2
+				       fortran-font-lock-keywords-1)
   "Additional expressions to highlight in Fortran mode.")
 
 (defvar fortran-mode-map ()