Mercurial > emacs
changeset 10880:7c5fe757600b
Use font-lock-maximum-decoration when setting ada-font-lock-keywords
| author | Simon Marshall <simon@gnu.org> |
|---|---|
| date | Thu, 02 Mar 1995 11:07:44 +0000 |
| parents | 73ce8261c2ce |
| children | 60d97d9b359d |
| files | lisp/progmodes/ada-mode.el |
| diffstat | 1 files changed, 6 insertions(+), 4 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/progmodes/ada-mode.el Thu Mar 02 10:57:07 1995 +0000 +++ b/lisp/progmodes/ada-mode.el Thu Mar 02 11:07:44 1995 +0000 @@ -109,11 +109,11 @@ ;;; LCD Archive Entry: ;;; ada-mode|Rolf Ebert|<ebert@inf.enst.fr> ;;; |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 <ebert@inf.enst.fr>") @@ -3673,7 +3673,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-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.") ;;;