diff options
| author | Simon Marshall <[email protected]> | 1995-03-02 11:07:44 +0000 |
|---|---|---|
| committer | Simon Marshall <[email protected]> | 1995-03-02 11:07:44 +0000 |
| commit | c1a644d3ea4f398209ef7b57e9797b5c961c86c8 (patch) | |
| tree | 9962da579e84fbec8d8855c78b7463589424ac86 | |
| parent | 799761f0c18a1a30109b013dcca08791d9ddfa84 (diff) | |
Use font-lock-maximum-decoration when setting ada-font-lock-keywords
| -rw-r--r-- | lisp/progmodes/ada-mode.el | 10 |
1 files changed, 6 insertions, 4 deletions
diff --git a/lisp/progmodes/ada-mode.el b/lisp/progmodes/ada-mode.el index 9a6f2d7816..a421469f60 100644 --- a/lisp/progmodes/ada-mode.el +++ b/lisp/progmodes/ada-mode.el @@ -109,11 +109,11 @@ ;;; LCD Archive Entry: ;;; ada-mode|Rolf Ebert|<[email protected]> ;;; |Major-mode for Ada -;;; |$Date: 1995/02/09 00:01:34 $|$Revision: 1.1 $| +;;; |$Date: 1995/02/09 00:17:31 $|$Revision: 1.2 $| -(defconst ada-mode-version (substring "$Revision: 1.1 $" 11 -2) - "$Id: ada-mode.el,v 1.1 1995/02/09 00:01:34 rms Exp rms $ +(defconst ada-mode-version (substring "$Revision: 1.2 $" 11 -2) + "$Id: ada-mode.el,v 1.2 1995/02/09 00:17:31 rms Exp simon $ Report bugs to: Rolf Ebert <[email protected]>") @@ -3673,7 +3673,9 @@ This does fairly subdued highlighting.") "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-2 +(defvar ada-font-lock-keywords (if font-lock-maximum-decoration + ada-font-lock-keywords-2 + ada-font-lock-keywords-1) "*Expressions to highlight in Ada mode.") ;;; |