MetaPost syntax highlighting broken

[Stephan Hennig]

This bug report will be sent to the Free Software Foundation,
not to your local site managers!
Please write in English if possible, because the Emacs maintainers
usually do not have translators to read other languages for them.

Your bug report will be posted to the address@hidden mailing
list.

Please describe exactly what actions triggered the bug
and the precise symptoms of the bug:

Action:
Load the attached file using 'C-x C-f mpcoloring.mp RET'.

Symptom:
The double quote inside btex .. etex is identified as a MetaPost string
boundary where it shouldn't. All subsequent text until the end of the
file is colored as belonging to a string where, in fact, there is no
string at all. (The "| is defined in package babel to break potential
ligatures similar to \/.)

Expected behavior:
Characters inside btex/verbatimtex .. etex should be colored according
to tex file rules.

Thanks,
Stephan Hennig



In GNU Emacs 21.3.50.1 (i386-mingw-nt5.1.2600)
 of 2005-01-30 on NONIQPC
Distributor `Microsoft Corp.', version 5.1.2600
configured using `configure --with-gcc (3.3) --cflags
-I../../jpeg-6b-3/include -I../../libpng-1.2.8/include
-I../../tiff-3.6.1-2/include -I../../xpm-nox-4.2.0/include
-I../../zlib-1.2.2/include'

Important settings:
  value of $LC_ALL: nil
  value of $LC_COLLATE: nil
  value of $LC_CTYPE: nil
  value of $LC_MESSAGES: nil
  value of $LC_MONETARY: nil
  value of $LC_NUMERIC: nil
  value of $LC_TIME: nil
  value of $LANG: DEU
  locale-coding-system: cp1252
  default-enable-multibyte-characters: t

Major mode: MetaPost

Minor modes in effect:
  delete-selection-mode: t
  pc-selection-mode: t
  tool-bar-mode: t
  encoded-kbd-mode: t
  mouse-wheel-mode: t
  menu-bar-mode: t
  global-font-lock-mode: t
  font-lock-mode: t
  unify-8859-on-encoding-mode: t
  utf-translate-cjk-mode: t
  line-number-mode: t
  transient-mark-mode: t

Recent input:
<help-echo> <help-echo> <help-echo> <help-echo> <help-echo>
<help-echo> <help-echo> <help-echo> <help-echo> <help-echo>
<help-echo> <help-echo> <help-echo> C-x C-f <backspace>
<backspace> <backspace> <backspace> <backspace> <backspace>
<backspace> <backspace> <backspace> <backspace> <backspace>
<backspace> <backspace> <backspace> <backspace> <backspace>
<backspace> <backspace> <backspace> <backspace> h <tab>
<tab> o <tab> l o a <tab> <backspace> <backspace> a
<tab> m e t a p <tab> m p c <tab> m <tab> <return>
<help-echo> M-x e m a <tab> r e <tab> p <tab> <backspace>
<backspace> <backspace> r e <backspace> <tab> <tab>
<backspace> <tab> <backspace> <backspace> <backspace>
<backspace> <backspace> <backspace> <backspace> r e
<tab> p <tab> o <tab> r t <tab> <return>

Recent messages:
Loading delsel...done
Loading font-lock...done
Loading jit-lock...done
Making completion list...
Loading help-mode...done
Loading meta-mode...done
Making completion list...
call-interactively: Text is read-only
Making completion list... [3 times]
Loading emacsbug...done

verbatimtex
\documentclass{article}
\usepackage[ngerman]{babel}
\usepackage{mathptmx}
\begin{document}
etex
prologues:=1;
beginfig(1);
  label(btex Brief"|inhalt etex, origin);
endfig;
end