[freewnn:00954] Re: RedHat 8.0 における頻度ファイルの位置

[亀井 信義 <zic-fw@XXXX>]

ああ！

亀井です、私少し嘘をつきました。

>>>>> On Sun, 06 Apr 2003 19:37:29 +0900, Hiroo Ono <hiroo@XXXX> said:

>> ~/.eggrc
>> の方は、
>> (wnn-add-dict "!@HOME/.emacs.d/dic/temp" "!@HOME/.emacs.d/dic/temp.h" 6 t t "/home/zic/.emacs.d/dic/password" "/home/zic/.emacs.d/dic/password")


 ~/.eggrc に、こういう書き方をすると、

RH8 の場合だと、
    /etc/FreeWnn/ja/dic/home/zic/.emacs.d/dic/temp.h
とか、こういうのができてしまいますね。

#   はやかわさんの症状通りと思います。


    ~/.eggrc 中では、 @ 表記はうまく使えません。


小野氏> 私は、以前 @HOME が効かなかったことがあって、結局原因を追求せずに
小野氏>   (defvar wnn-user-dic-dir
小野氏>     (concat (getenv "HOME") "/FreeWnn/"))
小野氏>   ...
小野氏>   (wnn-add-dict "pubdic/kihon.dic"
小野氏>         (concat wnn-user-dic-dir "kihon.h")    5 nil t)

    これが正しいです。済みませんでした。


    でも、~/.wnnenvrc の方は、@HOME が使える筈ですね?


小野氏> % elisp で .wnnenvrc の parser 書いて、.wnnenvrc だけ書けば済むとあり
小野氏> % 難いのですが…

    うーん、これはちと、面倒臭いですね。

    実際のところ私は、 ~/.eggrc 中に、

(setq zic-wnn-grp-dic-dir 
      (concat	"!" (expand-file-name	"~zic/.emacs.d/dic")))
(setq zic-wnn-usr-dic-dir 
      (concat	"!" (expand-file-name	"~/.emacs.d/dic")))
(setq zic-wnn-usr-password-file
      (concat	"" (expand-file-name	"~/.emacs.d/dic/zic-password")))

;;
;;  level 0; system;	.h needed on system dir;    nil t
;;  level 1; group;	.h needed on system dir;    nil t
;;  level 2; user;	.h not needed;		    t	nil
(defmacro   zic-wnn-add-dict	(diclevel dicname priority dicrw frqrw)
  (` (wnn-add-dict (concat (cond
			    ((eq (, diclevel) 0) "")
			    ((eq (, diclevel) 1) (concat zic-wnn-grp-dic-dir "/"))
			    (t			 (concat zic-wnn-usr-dic-dir "/")))
			   (, dicname))
		   (and (, frqrw)
			(cond
			 ((or (eq (, diclevel) 0) )
			  (list
			   (concat (file-name-sans-extension
				   (file-name-nondirectory (, dicname))) ".h")))
			 (t
			  (concat zic-wnn-usr-dic-dir  "/"
				  (file-name-sans-extension
				   (file-name-nondirectory (, dicname))) ".h"))))
		   (, priority)    (, dicrw)  (, frqrw)
		   zic-wnn-usr-password-file zic-wnn-usr-password-file)))

こんなような定義をして、

  (zic-wnn-add-dict 2	"zic-private"		12 t nil)
  (zic-wnn-add-dict 0	"pubdic/kihon.dic"	 5 nil t)

こんなような使い方をしています。

こうすると、
    zic-wnn-usr-dic-dir の、zic-private を、頻度込辞書ファイルとして使用

    システム辞書の pubdic/kihon.dic を、
	wnn-usr-dic-dir に頻度ファイルを置いて使用

という感じで使えるので。


  (zic-wnn-add-dict 1   "zic-jinmei"		 9 nil t)
とすると、
    zic-wnn-grp-dic-dir の zic-jinmei を、
	zic-wnn-usr-dic-dir に頻度ファイルを置いて使用
という感じで使えます。

#   多分、はやかわさんの希望の振舞

--
	   亀井 信義