[vine-users:080862] Re: wnn8 + tamago で母音の過不足修正を無効にしたい

[ARAI Shun-ichi]

あらいです。

> 　wnn7egg だと、define-coding-system がないと言ってエラーになってしまう
> んですよね。私はまだ Emacs22 なので。

　ちょっと思い付きでこんな風にしてみたら動くようになりました。
　どんなものでしょう。

--- /usr/share/emacs/site-lisp/wnn7egg/wnn7egg-com.el	2009-05-06 12:47:40.000000000 +0900
+++ wnn7egg-com.el	2011-02-24 17:26:17.000000000 +0900
@@ -135,19 +135,18 @@
 	      (katakana-jisx0201 . #x80)
 	      (japanese-jisx0208 . #x8080)
 	      (japanese-jisx0212 . #x8000)))
-
-(define-coding-system 'fixed-euc-jp
-  "Coding System for fixed EUC Japanese"
-  :mnemonic ?W
-  :coding-type 'charset
-  :charset-list '(fixed-euc-jp))
 ))
 
 (if (and (string< mule-version "6.0") ;; Emacs 22 or lesser.
 	 (not (coding-system-p 'fixed-euc-jp)))
     (make-coding-system 'fixed-euc-jp 4 ?W 
 		"Coding System for fixed EUC Japanese"
-		(cons ccl-decode-fixed-euc-jp ccl-encode-fixed-euc-jp)))
+		(cons ccl-decode-fixed-euc-jp ccl-encode-fixed-euc-jp))
+  (define-coding-system 'fixed-euc-jp
+    "Coding System for fixed EUC Japanese"
+    :mnemonic ?W
+    :coding-type 'charset
+    :charset-list '(fixed-euc-jp)))
 
 ;; Binary data