xemacs with auc-tex and cjk-enc
Hello All
照著 cjk-latex 中的方法設定 ~/.emacs 如下
(load-library "cjk-enc")
(defun TeX-run-CJK-LaTeX (name command file)
"Create a process for NAME using COMMAND to format FILE with CJK/LaTeX."
(write-cjk-file)
(TeX-run-LaTeX name command file))
;; replace the error source file from *.cjk to *.tex, then C-c ` can
;; be used as usual.
(add-hook 'TeX-translate-location-hook
'(lambda ()
(if (string-match "\\(.*\\)\.cjk$" file)
(setq file
(concat
(substring file
(match-beginning 1)
(match-end 1))
".tex")))))
(defvar TeX-command-list
(list (list "TeX" "tex '\\nonstopmode\\input %t'" 'TeX-run-TeX nil t)
(list "TeX Interactive" "tex %t" 'TeX-run-interactive nil t)
(list "LaTeX" "%l '\\nonstopmode\\input{%t}'"
'TeX-run-LaTeX nil t)
(list "LaTeX Interactive" "%l %t" 'TeX-run-interactive nil t)
(list "LaTeX2e" "latex2e '\\nonstopmode\\input{%t}'"
'TeX-run-LaTeX nil t)
(list "CJKLaTeX" "%l '\\nonstopmode\\input{%s.cjk}'"
'TeX-run-CJK-LaTeX nil t)
(if (or window-system (getenv "DISPLAY"))
(list "View" "%v " 'TeX-run-background t nil)
(list "View" "dvi2tty -q -w 132 %s " 'TeX-run-command t nil))
(list "Print" "%p " 'TeX-run-command t nil)
(list "Queue" "%q" 'TeX-run-background nil nil)
(list "File" "dvips %d -o %f " 'TeX-run-command t nil)
(list "BibTeX" "bibtex %s" 'TeX-run-BibTeX nil nil)
(list "Index" "makeindex %s" 'TeX-run-command nil t)
(list "Check" "lacheck %s" 'TeX-run-compile nil t)
(list "Spell" "<ignored>" 'TeX-run-ispell nil nil)
(list "Other" "" 'TeX-run-command t t)
;; Not part of standard TeX.
(list "Makeinfo" "makeinfo %t" 'TeX-run-compile nil t)
(list "AmSTeX" "amstex '\\nonstopmode\\input %t'"
'TeX-run-TeX nil t)))
但在 xemacs 中卻無法使用 CJKLatex 的命令, 在 emacs20 中可以, 有人知道如何修改嗎?
Reply to: