Sorry, I posted wrong ML. I emailed again.
----------
I propose a new variable TeX-token-char.
This is a sample code in tex.el.
>> FROM HERE <<
(defvar TeX-token-char
(if (featurep 'mule)
"\\(?:[a-zA-Z]\\|\\cj\\)"
"[a-zA-Z]")
"Regexp to match TeX token charactor.
Please use shy group if you use a grouping construct, because the
functions/variables which use `TeX-token-char' expect not to
alter the numbering of any ordinary, non-shy groups.")
(defvar plain-TeX-auto-regexp-list
(let ((token TeX-token-char))
`((,(concat "\\\\def\\\\\\(" token "+\\)[EMAIL PROTECTED]") 1
TeX-auto-symbol-check)
(,(concat "\\\\let\\\\\\(" token "+\\)[EMAIL PROTECTED]") 1
TeX-auto-symbol-check)
(,(concat "\\\\font\\\\\\(" token "+\\)[EMAIL PROTECTED]") 1
TeX-auto-symbol)
(,(concat "\\\\chardef\\\\\\(" token "+\\)[EMAIL PROTECTED]") 1
TeX-auto-symbol)
(,(concat "\\\\new\\(?:count\\|dimen\\|muskip\\|skip\\)\\\\\\(" token
"+\\)[EMAIL PROTECTED]")
1 TeX-auto-symbol)
(,(concat "\\\\newfont{?\\\\\\(" token "+\\)}?") 1 TeX-auto-symbol)
(,(concat "\\\\typein\\[\\\\\\(" token "+\\)\\]") 1 TeX-auto-symbol)
("\\\\input +\\(\\.*[^#%\\\\\\.\n\r]+\\)\\(\\.[^#%\\\\\\.\n\r]+\\)?"
1 TeX-auto-file)
(,(concat "\\\\mathchardef\\\\\\(" token "+\\)[EMAIL PROTECTED]") 1
TeX-auto-symbol)))
"List of regular expression matching common LaTeX macro definitions.")
>> END HERE <<
Currently, plain-TeX-auto-regexp-list is defined in two files:
tex.el and tex-jp.el. It is confused to maintenance both
codes. And I should say that AUCTeX 9.10g (IIRC) did not work
on Japanese text because plain-TeX-auto-regexp-list in
tex-jp.el did not follow the change of it in tex.el.
If no objection, I'll check in this change, fix latex.el in the
same way, and remove plain-TeX-auto-regexp-list, etc... from
tex-jp.el.
regards,
---
email: [EMAIL PROTECTED]
Name:: Masayuki Ataka // (Japan)
_______________________________________________
auctex-devel mailing list
[email protected]
http://lists.gnu.org/mailman/listinfo/auctex-devel
