diff options
| author | Stefan Monnier | 2008-05-18 04:17:11 +0000 |
|---|---|---|
| committer | Stefan Monnier | 2008-05-18 04:17:11 +0000 |
| commit | 7dcc0df26071beed5b3f6723a9f8868843d2fa63 (patch) | |
| tree | bc2c5d40702f6c07f21ca613e032bc77fe90a35e | |
| parent | 9f94054523715db2cb186ab1f2b1ea83f42f5ccd (diff) | |
| download | emacs-7dcc0df26071beed5b3f6723a9f8868843d2fa63.tar.gz emacs-7dcc0df26071beed5b3f6723a9f8868843d2fa63.zip | |
(fortran-font-lock-keywords-2): Add keywords for
logic operators .eqv. and .neqv.
| -rw-r--r-- | lisp/ChangeLog | 5 | ||||
| -rw-r--r-- | lisp/progmodes/fortran.el | 2 |
2 files changed, 6 insertions, 1 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index e4ea722702d..927983e12cc 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -1,3 +1,8 @@ | |||
| 1 | 2008-05-18 mohrmarc <debian@miller-mohr.de> (tiny change) | ||
| 2 | |||
| 3 | * progmodes/fortran.el (fortran-font-lock-keywords-2): Add keywords for | ||
| 4 | logic operators .eqv. and .neqv. | ||
| 5 | |||
| 1 | 2008-05-17 David Hull <david@snap.com> (tiny change) | 6 | 2008-05-17 David Hull <david@snap.com> (tiny change) |
| 2 | 7 | ||
| 3 | * vc-hg.el (vc-hg-annotate-command): Allow white space before | 8 | * vc-hg.el (vc-hg-annotate-command): Allow white space before |
diff --git a/lisp/progmodes/fortran.el b/lisp/progmodes/fortran.el index d326207d73f..0e7fd0ee051 100644 --- a/lisp/progmodes/fortran.el +++ b/lisp/progmodes/fortran.el | |||
| @@ -360,7 +360,7 @@ program\\|subroutine\\)\\>[ \t]*\\(\\sw+\\)?" | |||
| 360 | ;; Builtin operators. | 360 | ;; Builtin operators. |
| 361 | (concat "\\." (regexp-opt | 361 | (concat "\\." (regexp-opt |
| 362 | '("and" "or" "not" "lt" "le" "eq" "ge" | 362 | '("and" "or" "not" "lt" "le" "eq" "ge" |
| 363 | "gt" "ne" "true" "false") | 363 | "gt" "ne" "eqv" "neqv" "true" "false") |
| 364 | 'paren) "\\.") | 364 | 'paren) "\\.") |
| 365 | ;; do/goto keywords and targets, and goto tags. | 365 | ;; do/goto keywords and targets, and goto tags. |
| 366 | '("\\<\\(do\\|go *to\\)\\>[ \t]*\\([0-9]+\\)?" | 366 | '("\\<\\(do\\|go *to\\)\\>[ \t]*\\([0-9]+\\)?" |