Newsgroups: fj.editor.emacs
Path: galaxy.trc.rwcp.or.jp!jaist-news!cs.titech!wnoc-tyo-news!sh.wide!fgw!fdm!flab!koba
From: koba@flab.fujitsu.co.jp (Kobayashi Shinji)
Subject: Re: problem japanese-error-message in auctex
In-Reply-To: j92055@bw.ie.u-ryukyu.ac.jp's message of 19 May 1994 19:12:49 +0900
Message-ID: <KOBA.94May20111614@cindy.avalon.flab.fujitsu.co.jp>
Sender: news@flab.fujitsu.co.jp
Nntp-Posting-Host: cindy.avalon.flab.fujitsu.co.jp
Organization: Fujitsu Laboratories Ltd., Kawasaki, Japan
References: <Cq1oDE.6B7@spn.ie.u-ryukyu.ac.jp>
Date: Fri, 20 May 1994 02:16:14 GMT
Lines: 163
Xref: galaxy.trc.rwcp.or.jp fj.editor.emacs:4723
X-originally-archived-at: http://galaxy.rwcp.or.jp/text/cgi-bin/newsarticle2?ng=fj.editor.emacs&nb=4723&hd=a
X-reformat-date: Mon, 18 Oct 2004 15:18:22 +0900
X-reformat-comment: Tabs were expanded into 4 column tabstops by the Galaxy's archiver. See http://katsu.watanabe.name/ancientfj/galaxy-format.html for more info.


$B>.NS!wIY;NDL8&$G$9!#(B

>>>>> In article <Cq1oDE.6B7@spn.ie.u-ryukyu.ac.jp>, j92055@bw.ie.u-ryukyu.ac.jp (Kohji Hachiman) writes:

$BH,H((B>   japanese-TeX-error-message$B$r(Bnil$B0J30(B(t$B$K$9$k(B)$B$K@_Dj$9$l$P!"(B
$BH,H((B>   $B%(%i!<%a%C%;!<%8$,F|K\8l$G=P$k$O$:$J$N$G$9$,!"$I$&$b$&$^$/9T$-$^$;$s!#(B
$BH,H((B>   jLaTeX$B%b!<%I$KF~$C$?;~$K$O!"(BTeX-error-description-list$B$O$A$c$s$H(B
$BH,H((B>   $BF|K\8l$K$J$C$F$$$k$N$K!"%3%s%Q%$%k$7$?8e$@$H1Q8l$K$J$C$F$7$^$$$^$9!#(B

 tex-buf.el $B$G(B TeX-error-description-list $B$r(B defconst $B$7$F$7$^$C$F$$$k(B
$B$?$a$G$9!#$H$j$"$($:!"2<5-$N%Q%C%A$rEv$F$l$P;H$($k$h$&$K$J$j$^$9!#(B

$BH,H((B>   $B%$%s%9%H!<%k$N>uBV$O(Btex-site.el$B$H(Btex-jp.el$B$@$1$r(Bload-path$B$NDL$C$F$$$k(B
$BH,H((B>   $B$H$3$m$KCV$$$F$$$^$9!#(B

 $B$"$^$j4X78$"$j$^$;$s$,!"(Btex-site.el $B$r%m!<%I$7$?8e$G$O(B load-path $B$,@5(B
$B$7$/@_Dj$5$l$k$O$:$J$N$G!"(Btex-jp.elc $B$O(B tex-buf.elc $B$J$I$HF1$8>l=j$KCV(B
$B$$$F$*$/$@$1$GBg>fIW$G$9!#(B

 auctex-9.0v $B$O%j%j!<%9A0$K;d$,==J,%A%'%C%/$G$-$J$+$C$?$?$a$K!"F|K\8l(B
$B4XO"$G$$$/$D$+LdBj$,$"$j$^$9!#5$$,$D$$$?;~E@$G:n<T$NJ}$K$OO"Mm$7$F$$$^(B
$B$9$N$G<!$N%j%j!<%9$K$OH?1G$5$l$k$H;W$$$^$9$,!#!#!#:#2s$NLdBj$bAjCL$7$F(B
$B$*$-$^$9!#(B
 auctex-9.0v $B$G$O!"(Btex-jp.el $B$r%m!<%I$7$F$$$k$H(B M-x
TeX-auto-generate-global $B$,$G$-$J$$$H$$$&%P%0$b$"$j$^$9!#$D$$$G$K$3$N(B
$BLdBj$KBP$9$k%Q%C%A$b%]%9%H$7$F$*$-$^$9!#:n<T$NJ}$K$OO"Mm:Q$G$9$,!"$^$@(B
$B%*%U%#%7%c%k$J$b$N$G$O$"$j$^$;$s!#(B

--- tex-buf.el.origFri Apr 29 05:27:51 1994
+++ tex-buf.elFri May 20 11:04:26 1994
@@ -1113,7 +1113,7 @@
 
 ;;; Error Messages
 
-(defconst TeX-error-description-list
+(defvar TeX-error-description-list
   '(("Bad \\\\line or \\\\vector argument.*" .
 "The first argument of a \\line or \\vector command, which specifies the
 slope, is illegal\.")
--- tex-jp.el.origFri Apr 29 05:27:54 1994
+++ tex-jp.elFri May 20 11:12:01 1994
@@ -70,21 +70,27 @@
 
 (defconst LaTeX-auto-regexp-list 
   (append
-   '(("\\\\newcommand{?\\\\\\(\\([a-zA-Z]\\|\\cj\\)+\\)}?\\[\\([0-9]+\\)\\]"
-       (1 3) TeX-auto-arguments)
+   '(("\\\\newcommand{?\\\\\\(\\([a-zA-Z]\\|\\cj\\)+\\)}?\\[\\([0-9]+\\)\\]\
+\\[\\([^\]\\\\\n\r]+\\)\\]"
+      (1 3 4) LaTeX-auto-optional)
+     ("\\\\newcommand{?\\\\\\(\\([a-zA-Z]\\|\\cj\\)+\\)}?\\[\\([0-9]+\\)\\]"
+      (1 3) LaTeX-auto-arguments)
      ("\\\\newcommand{?\\\\\\(\\([a-zA-Z]\\|\\cj\\)+\\)}?" 1 TeX-auto-symbol)
      ("\\\\newenvironment{?\\(\\([a-zA-Z]\\|\\cj\\)+\\)}?\\[\\([0-9]+\\)\\]"
-      (1 3) TeX-auto-env-args)
-     ("\\\\newenvironment{?\\(\\([a-zA-Z]\\|\\cj\\)+\\)}?" 1
-      LaTeX-auto-environment)
+      (1 3) LaTeX-auto-env-args)
+     ("\\\\newenvironment{?\\(\\([a-zA-Z]\\|\\cj\\)+\\)}?" 1 LaTeX-auto-environment)
      ("\\\\newtheorem{\\(\\([a-zA-Z]\\|\\cj\\)+\\)}" 1 LaTeX-auto-environment)
-     ("\\\\input{\\([^#\\\\\\.\n\r]+\\)\\(\\.sty\\)?}" 1 TeX-auto-file)
-     ("\\\\include{\\([^#\\\\\\.\n\r]+\\)\\(\\.sty\\)?}" 1 TeX-auto-file)
-     ("\\\\bibitem{\\(\\([a-zA-Z]\\|\\cj\\)[^, \n\r\t%\"#'()={}]*\\)}" 1
-      LaTeX-auto-bibitem)
+     ("\\\\input{\\(\\.*[^#}%\\\\\\.\n\r]+\\)\\(\\.[^#}%\\\\\\.\n\r]+\\)?}"
+      1 TeX-auto-file)
+     ("\\\\include{\\(\\.*[^#}%\\\\\\.\n\r]+\\)\\(\\.[^#}%\\\\\\.\n\r]+\\)?}"
+      1 TeX-auto-file)
+     ("\\\\usepackage\\(\\[[^\]\\\\]*\\]\\)?\
+{\\(\\([^#}\\\\\\.%]\\|%[^\n\r]*[\n\r]\\)+\\)}"
+      (2) LaTeX-auto-style)
+     ("\\\\bibitem{\\(\\([a-zA-Z]\\|\\cj\\)[^, \n\r\t%\"#'()={}]*\\)}" 1 LaTeX-auto-bibitem)
      ("\\\\bibitem\\[[^][\n\r]+\\]{\\(\\([a-zA-Z]\\|\\cj\\)[^, \n\r\t%\"#'()={}]*\\)}"
       1 LaTeX-auto-bibitem)
-     ("\\\\bibliography{\\([^#\\\\\\.\n\r]+\\)}" 1 LaTeX-auto-bibliography))
+     ("\\\\bibliography{\\([^#}\\\\\n\r]+\\)}" 1 LaTeX-auto-bibliography))
    LaTeX-auto-label-regexp-list
    LaTeX-auto-minimal-regexp-list)
   "List of regular expression matching common LaTeX macro definitions.")
@@ -100,15 +106,16 @@
      2 TeX-auto-symbol)
     ("\\\\newfont{?\\\\\\(\\([a-zA-Z]\\|\\cj\\)+\\)}?" 1 TeX-auto-symbol)
     ("\\\\typein\\[\\\\\\(\\([a-zA-Z]\\|\\cj\\)+\\)\\]" 1 TeX-auto-symbol)
-    ("\\\\input +\\([^#\\\\\\.\n\r]+\\)\\(\\.sty\\)?" 1 TeX-auto-file)
+    ("\\\\input +\\(\\.*[^#%\\\\\\.\n\r]+\\)\\(\\.[^#%\\\\\\.\n\r]+\\)?"
+     1 TeX-auto-file)
     ("\\\\mathchardef\\\\\\(\\([a-zA-Z]\\|\\cj\\)+\\)[^a-zA-Z@]" 1
      TeX-auto-symbol))
   "List of regular expression matching common LaTeX macro definitions.")
 
 (defconst BibTeX-auto-regexp-list
   '(("@[Ss][Tt][Rr][Ii][Nn][Gg]" 1 ignore)
-    ("@[a-zA-Z]+{\\(\\([a-zA-Z]\\|\\cj\\)[^, \n\r\t%\"#'()={}]*\\)" 1
-     LaTeX-auto-bibitem))
+    ("@[a-zA-Z]+[{(][ \t]*\\(\\([a-zA-Z]\\|\\cj\\)[^, \n\r\t%\"#'()={}]*\\)"
+     1 LaTeX-auto-bibitem))
   "List of regexp-list expressions matching BibTeX items.")
 
 ))
@@ -118,21 +125,27 @@
 
 (defconst LaTeX-auto-regexp-list 
   (append
-   '(("\\\\newcommand{?\\\\\\(\\([a-zA-Z]\\|\\z\\)+\\)}?\\[\\([0-9]+\\)\\]"
-       (1 3) TeX-auto-arguments)
+   '(("\\\\newcommand{?\\\\\\(\\([a-zA-Z]\\|\\z\\)+\\)}?\\[\\([0-9]+\\)\\]\
+\\[\\([^\]\\\\\n\r]+\\)\\]"
+      (1 3 4) LaTeX-auto-optional)
+     ("\\\\newcommand{?\\\\\\(\\([a-zA-Z]\\|\\z\\)+\\)}?\\[\\([0-9]+\\)\\]"
+      (1 3) LaTeX-auto-arguments)
      ("\\\\newcommand{?\\\\\\(\\([a-zA-Z]\\|\\z\\)+\\)}?" 1 TeX-auto-symbol)
      ("\\\\newenvironment{?\\(\\([a-zA-Z]\\|\\z\\)+\\)}?\\[\\([0-9]+\\)\\]"
-      (1 3) TeX-auto-env-args)
-     ("\\\\newenvironment{?\\(\\([a-zA-Z]\\|\\z\\)+\\)}?" 1
-      LaTeX-auto-environment)
+      (1 3) LaTeX-auto-env-args)
+     ("\\\\newenvironment{?\\(\\([a-zA-Z]\\|\\z\\)+\\)}?" 1 LaTeX-auto-environment)
      ("\\\\newtheorem{\\(\\([a-zA-Z]\\|\\z\\)+\\)}" 1 LaTeX-auto-environment)
-     ("\\\\input{\\([^#\\\\\\.\n\r]+\\)\\(\\.sty\\)?}" 1 TeX-auto-file)
-     ("\\\\include{\\([^#\\\\\\.\n\r]+\\)\\(\\.sty\\)?}" 1 TeX-auto-file)
-     ("\\\\bibitem{\\(\\([a-zA-Z]\\|\\z\\)[^, \n\r\t%\"#'()={}]*\\)}" 1
-      LaTeX-auto-bibitem)
+     ("\\\\input{\\(\\.*[^#}%\\\\\\.\n\r]+\\)\\(\\.[^#}%\\\\\\.\n\r]+\\)?}"
+      1 TeX-auto-file)
+     ("\\\\include{\\(\\.*[^#}%\\\\\\.\n\r]+\\)\\(\\.[^#}%\\\\\\.\n\r]+\\)?}"
+      1 TeX-auto-file)
+     ("\\\\usepackage\\(\\[[^\]\\\\]*\\]\\)?\
+{\\(\\([^#}\\\\\\.%]\\|%[^\n\r]*[\n\r]\\)+\\)}"
+      (2) LaTeX-auto-style)
+     ("\\\\bibitem{\\(\\([a-zA-Z]\\|\\z\\)[^, \n\r\t%\"#'()={}]*\\)}" 1 LaTeX-auto-bibitem)
      ("\\\\bibitem\\[[^][\n\r]+\\]{\\(\\([a-zA-Z]\\|\\z\\)[^, \n\r\t%\"#'()={}]*\\)}"
       1 LaTeX-auto-bibitem)
-     ("\\\\bibliography{\\([^#\\\\\\.\n\r]+\\)}" 1 LaTeX-auto-bibliography))
+     ("\\\\bibliography{\\([^#}\\\\\n\r]+\\)}" 1 LaTeX-auto-bibliography))
    LaTeX-auto-label-regexp-list
    LaTeX-auto-minimal-regexp-list)
   "List of regular expression matching common LaTeX macro definitions.")
@@ -148,15 +161,16 @@
      2 TeX-auto-symbol)
     ("\\\\newfont{?\\\\\\(\\([a-zA-Z]\\|\\z\\)+\\)}?" 1 TeX-auto-symbol)
     ("\\\\typein\\[\\\\\\(\\([a-zA-Z]\\|\\z\\)+\\)\\]" 1 TeX-auto-symbol)
-    ("\\\\input +\\([^#\\\\\\.\n\r]+\\)\\(\\.sty\\)?" 1 TeX-auto-file)
+    ("\\\\input +\\(\\.*[^#%\\\\\\.\n\r]+\\)\\(\\.[^#%\\\\\\.\n\r]+\\)?"
+     1 TeX-auto-file)
     ("\\\\mathchardef\\\\\\(\\([a-zA-Z]\\|\\z\\)+\\)[^a-zA-Z@]" 1
      TeX-auto-symbol))
   "List of regular expression matching common LaTeX macro definitions.")
 
 (defconst BibTeX-auto-regexp-list
   '(("@[Ss][Tt][Rr][Ii][Nn][Gg]" 1 ignore)
-    ("@[a-zA-Z]+{\\(\\([a-zA-Z]\\|\\z\\)[^, \n\r\t%\"#'()={}]*\\)" 1
-     LaTeX-auto-bibitem))
+    ("@[a-zA-Z]+[{(][ \t]*\\(\\([a-zA-Z]\\|\\z\\)[^, \n\r\t%\"#'()={}]*\\)"
+     1 LaTeX-auto-bibitem))
   "List of regexp-list expressions matching BibTeX items.")
 
 ))
--

$B>.NS(B $B?-<#(B ($B$3$P$d$7(B $B$7$s$8(B)
$BIY;NDL8&5f=j(B $B%^%k%A%a%G%#%"%7%9%F%`8&5f=j(B $B%7%9%F%`8&5fItLg(B $B>pJsLV%7%9%F%`8&5fIt(B
koba@flab.fujitsu.co.jp
