changeset 10881:60d97d9b359d

Use font-lock-maximum-decoration to set ada-font-lock-keywords.
author Simon Marshall <simon@gnu.org>
date Thu, 02 Mar 1995 11:10:55 +0000
parents 7c5fe757600b
children bb8df7aad5ef
files lisp/=ada.el
diffstat 1 files changed, 3 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/=ada.el	Thu Mar 02 11:07:44 1995 +0000
+++ b/lisp/=ada.el	Thu Mar 02 11:10:55 1995 +0000
@@ -140,7 +140,9 @@
   "For consideration as a value of `ada-font-lock-keywords'.
 This does a lot more highlighting.")
 
-(defvar ada-font-lock-keywords ada-font-lock-keywords-1
+(defvar ada-font-lock-keywords (if font-lock-maximum-decoration
+				   ada-font-lock-keywords-2
+				 ada-font-lock-keywords-1)
   "Additional expressions to highlight in Ada mode.")
 
 (defvar ada-mode-map nil