# HG changeset patch
# User Simon Marshall <simon@gnu.org>
# Date 794143176 0
# Node ID bb8df7aad5efe442f9c870947098f64cab68d8fc
# Parent  60d97d9b359d4848ecd10bdcb9a2cb11e2e52aa3
Use font-lock-maximum-decoration when setting f90-font-lock-keywords.

diff -r 60d97d9b359d -r bb8df7aad5ef lisp/progmodes/f90.el
--- a/lisp/progmodes/f90.el	Thu Mar 02 11:10:55 1995 +0000
+++ b/lisp/progmodes/f90.el	Thu Mar 02 11:19:36 1995 +0000
@@ -314,7 +314,9 @@
   "For consideration as a value of `f90-font-lock-keywords'.
 This highlights variable types, \"keywords,\" etc.")
 
-(defvar f90-font-lock-keywords f90-font-lock-keywords-2
+(defvar f90-font-lock-keywords (if font-lock-maximum-decoration
+				   f90-font-lock-keywords-2
+				 f90-font-lock-keywords-1)
   "*Additional expressions to highlight in F90 mode.")
 
 ;; hilit19 customization and expressions