# HG changeset patch
# User Simon Marshall <simon@gnu.org>
# Date 794143230 0
# Node ID 526ba0811e2efe37f6931bc91547821ea08035b9
# Parent  bb8df7aad5efe442f9c870947098f64cab68d8fc
Use font-lock-maximum-decoration when setting fortran-font-lock-keywords.

diff -r bb8df7aad5ef -r 526ba0811e2e lisp/progmodes/fortran.el
--- a/lisp/progmodes/fortran.el	Thu Mar 02 11:19:36 1995 +0000
+++ b/lisp/progmodes/fortran.el	Thu Mar 02 11:20:30 1995 +0000
@@ -243,7 +243,9 @@
   "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 ()