Path: galaxy.trc.rwcp.or.jp!coconuts.jaist!wnoc-tyo-news!infoweb-news!news.tokyo.infoweb.or.jp!fgwnews!fdmnews!flabnews!news.avalon.flab.fujitsu.co.jp!koba
From: koba@flab.fujitsu.co.jp (KOBAYASHI Shinji)
Newsgroups: fj.comp.texhax
Subject: Re: [Q]AUSTEX, XDVI, GHOSTSCRIPT on UNIX.
Date: 25 Nov 1995 22:42:51 GMT
Organization: Fujitsu Laboratories Ltd., Kawasaki, Japan
Lines: 102
Message-ID: <KOBA.95Nov26074251@phoenix.avalon.flab.fujitsu.co.jp>
References: <shoe-1711952308340001@ppp693.st.rim.or.jp>
NNTP-Posting-Host: phoenix.avalon.flab.fujitsu.co.jp
In-reply-to: shoe@st.rim.or.jp's message of 17 Nov 1995 23:08:34 +0900
Xref: galaxy.trc.rwcp.or.jp fj.comp.texhax:7046
X-originally-archived-at: http://galaxy.rwcp.or.jp/text/cgi-bin/newsarticle2?ng=fj.comp.texhax&nb=7046&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

 $BCY$$%U%)%m!<$G$4$a$s$J$5$$!#(B

>>>>> In article <shoe-1711952308340001@ppp693.st.rim.or.jp>
>>>>> shoe@st.rim.or.jp (Shoichi Nakada) writes:

$BCfED(B> $B!!#1!%(BAUSTeX $B$N%$%s%9%H!<%k$,>e<j$/9T$C$F$J$$$i$7$$!#(B

$BCfED(B> $B!!!!!!!!(BUNIX Magazine $B$N%P%C%/%J%s%P!<$r8+$J$,$i!"(BVer2.7a $B$N%$%s(B
$BCfED(B> $B%9%H!<%k$r$7$?$N$G$9$,!"(B<.tex> $B$N%U%!%$%k$rFI$s$G$b(B JLaTeX $B%b!<(B
$BCfED(B> $B%I$K$J$j$^$;$s!#(B

 $B8=:_$N(B AUC TeX $B$N:G?7%j%j!<%9$O(B auctex-9.2y $B$G$9$N$G!"$^$:$3$l$rF~<j(B
$B$7$F$/$@$5$$!#$^$?$O!"D9$i$/&A%j%j!<%9$N$^$^$H$J$C$F$$$k(B auctex-9.3b 
$B$G$b$$$$$G$9!#(B
 auctex-9.3b $B$J$i$=$N$^$^;H$($k$O$:$G$9$,!"(Bauctex-9.2y $B$N>l9g$O0J2<$K(B
$BE:IU$9$k%Q%C%A$rEv$F$F$+$i$*;H$$$/$@$5$$!#(B

 $B$3$N%Q%C%A$K$h$j!"B?>/;EMM$,JQ$o$C$F$$$^$9!#(BC-c C-c $B$7$?$H$-$N%G%U%)(B
$B%k%H$O(B jLaTeX $B$G$O$J$/!"(BLaTeX $B$K$J$j$^$9!#(BjLaTeX $B$H$$$&$b$N$O$J$/$J$j(B
$B$^$7$?!#$=$NBe$o$j!"F|K\8l(B TeX $B$J$i(B ($B%9%?%$%k%U%!%$%kL>$GH=JL$7$F$$$^(B
$B$9(B) LaTeX $B$rA*Br$7$?;~$K(B latex $B$G$O$J$/(B jlatex $B$,5/F0$5$l$^$9!#(B

------------------------------<$B%Q%C%A(B>------------------------------
--- tex-jp.el-distSat Jan 28 06:08:19 1995
+++ tex-jp.elTue Feb 28 01:37:04 1995
@@ -7,9 +7,7 @@
 ;;; Customization
 
 (setq TeX-format-list
-      (append '(("JSLITEX" japanese-slitex-mode
- "\\\\documentstyle[^%\n]*{jslides}")
-("JLATEX" japanese-latex-mode "\\\\documentstyle[^%\n]*{j")
+      (append '(("JLATEX" japanese-latex-mode "\\\\documentstyle[^%\n]*{j")
 ("JTEX" japanese-plain-tex-mode
  "-- string likely in Japanese TeX --"))
       TeX-format-list))
@@ -17,17 +15,19 @@
 (setq TeX-command-list
       (append (list (list "jTeX" "jtex '\\nonstopmode\\input %t'"
   'TeX-run-TeX nil t)
-    (list "jLaTeX" "jlatex '\\nonstopmode\\input{%t}'"
-  'TeX-run-LaTeX nil t)
-    (list "jSliTeX" "jslitex '\\nonstopmode\\input{%t}'"
-  'TeX-run-LaTeX nil t)
-    (list "AmSjTeX" "amsjtex '\\nonstopmode\\input %t'"
-  'TeX-run-TeX nil t)
-    (list "AmSjLaTeX" "amsjlatex '\\nonstopmode\\input{%t}'"
-  'TeX-run-LaTeX nil t)
     (list "jBibTeX" "jbibtex %s" 'TeX-run-BibTeX nil nil))
       TeX-command-list))
        
+(setq LaTeX-command-style
+      (if (string-equal LaTeX-version "2")
+  (append '(("^ams" "amsjlatex")
+    ("^jslides$" "jslitex")
+    ("^j-?\\(article\\|report\\|book\\)$" "jlatex"))
+  LaTeX-command-style)))
+
+(setcdr (assoc "%l" TeX-expand-list)
+(list 'TeX-style-check LaTeX-command-style))
+
 (defvar japanese-TeX-error-messages t
   "If non-nil, explain TeX error messages in Japanese.")
 
@@ -228,28 +228,7 @@
   "Japanese LaTeX specific initializations."
   (if japanese-TeX-mode
       (progn
-(setq TeX-command-default "jLaTeX")
 (setq LaTeX-default-style japanese-LaTeX-default-style)
-(setq LaTeX-style-list japanese-LaTeX-style-list)
-(setq TeX-command-BibTeX "jBibTeX")
-(setq japanese-TeX-mode nil))))
-
-(add-hook 'SLiTeX-mode-hook 'japanese-slitex-mode-initialization)
-
-;;;###autoload
-(defun japanese-slitex-mode ()
-  "Major mode for editing files of input for Japanese plain TeX.
-Set japanese-TeX-mode to t, and enters slitex-mode."
-  (interactive)
-  (setq japanese-TeX-mode t)
-  (slitex-mode))
-
-(defun japanese-slitex-mode-initialization ()
-  "Japanese SLiTeX specific initializations."
-  (if japanese-TeX-mode
-      (progn
-(setq TeX-command-default "jSLiTeX")
-(setq LaTeX-default-style "jslides")
 (setq LaTeX-style-list japanese-LaTeX-style-list)
 (setq TeX-command-BibTeX "jBibTeX")
 (setq japanese-TeX-mode nil))))
----------------------------<$B%Q%C%A=*$j(B>----------------------------
--

$B>.NS(B $B?-<#(B ($B$3$P$d$7(B $B$7$s$8(B)
$BIY;NDL8&5f=j(B P$B%W%m%8%'%/%HIt(B $B%7%9%F%`8&5fIt(B
koba@flab.fujitsu.co.jp
