[debian-devel:09404] auctex problem

[NABETANI Hidenobu <nabetani@xxxxxxxxxxxxxxxxxxxxxxxxxxx>]

鍋谷です。

# この問題が解決できれば auctex-ja は本家 auctex に完全にマージできます。

japanese-latex-mode のメニューバーが変更されず、latex-mode のメニュー
のままになってしまう問題です。状況がある程度わかりました。

まず tex.el が読み込まれ、TeX-command-list が L.108 からの
----------------------------------------------------------------------
(defcustom TeX-command-list
  ;; You may have to remove the single quotes around the command
  ;; arguments if you use DOS.
.........
.........

---------------------------------------------------------------------- 
で定義され、TeX-mode-menu が L.2464 からの
----------------------------------------------------------------------
(easy-menu-define TeX-mode-menu
    TeX-mode-map
    "Menu used in TeX mode."
  (append '("Command")
	  '(("Command on"
	     [ "Master File" TeX-command-select-master
	       :keys "C-c C-c" :style radio
	       :selected (eq TeX-command-current 'TeX-command-master) ]
	     [ "Buffer" TeX-command-select-buffer
	       :keys "C-c C-b" :style radio
	       :selected (eq TeX-command-current 'TeX-command-buffer) ]
	     [ "Region" TeX-command-select-region
	       :keys "C-c C-r" :style radio
	       :selected (eq TeX-command-current 'TeX-command-region) ]))
	  (let ((file 'TeX-command-on-current))
	    (mapcar 'TeX-command-menu-entry TeX-command-list))))
----------------------------------------------------------------------
で定義されています。その後、tex-jp.el で
----------------------------------------------------------------------
(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 "pTeX" "ptex '\\nonstopmode\\input %t'"
                          'TeX-run-TeX nil t)
		    (list "pLaTeX" "platex '\\nonstopmode\\input{%t}'"
			  'TeX-run-LaTeX nil t)
		    (list "jBibTeX" "jbibtex %s" 'TeX-run-BibTeX nil nil))
	      TeX-command-list))
----------------------------------------------------------------------
として TeX-command-list を変更しています。しかし、これだけでは
TeX-mode-menu は変更されず、tex.el で設定した TeX-command-list
が使われています。

tex-jp.el にどう書けば TeX-mode-menu を変更できるのでしょうか？
何分 Emacs list を理解していませんので、よろしくお願い致します。

# 現在の auctex-ja ではこれを回避するために tex-site.el で設定していま
# した(tex-site.el は tex.el より先に読み込まれる！)。しかし、これでは
# japanese に特化した設定であり、本家にマージできません。
---
大阪大学理学研究科物理学専攻 博士後期課程2年 大坪研究室(06-6850-5346)
         鍋谷 栄展      nabetani@xxxxxxxxxxxxxxxxxxxxxxxxxxx