[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[plamo:26355] emacs-canna(20.7)



松井と申します。

plamo2.2.6 で使用していましたemacs20.7(emacs-canna) をplamo4.03 で使用
しようと思いましたが下記のようなエラーが起こってしまいます。

# emacs 21.3 を使用すれば良いのでしょうが、.emacs を以前の設定と同じに
修正するのが大変そうなので。。。:-)

Error in init file: error: "Autoloading failed to define function canna"

emacs-canna については、バイナリをplamo 2.2.6 の環境から持ってきて、ラ
イブラリ等は20.7 のものを使用するように修正したつもりでが。。。修正し
足りないものと思われます。

対処方法等、ご教授いただけましたら幸いです。難しいようでしたら、21.3 
を使用することにしようと考えています。よろしくお願いいたします。

$ dir /usr/share/emacs/
合計 20
drwxr-xr-x    5 root     root         4096  9月 14日  10:34 ./
drwxr-xr-x   67 root     root         4096  9月 10日 2001年 ../
drwxr-xr-x    6 root     root         4096  9月 13日  21:25 20.7/
drwxr-xr-x    6 root     root         4096  9月  9日  23:29 21.3/
drwxr-xr-x   11 root     root         4096  9月  9日  23:29 site-lisp/

$ dir /usr/libexec/emacs/
合計 16
drwxr-xr-x    4 root     root         4096  9月 13日  21:30 ./
drwxr-xr-x    8 root     root         4096  9月  9日  23:32 ../
drwxr-xr-x    3 root     root         4096  9月 13日  21:30 20.7/
drwxr-xr-x    3 root     root         4096  9月  9日  23:29 21.3/

$ ps ax | grep canna
  283 ?        S      0:00 /usr/sbin/cannaserver -inet
  972 tty1     S      0:00 kinput2-canna -cannaserver localhost

$ grep -i canna .emacs
      (substitute-key-definition 'canna-self-insert-command 'skk-insert map
;;; Canna を使う場合はこちらを有効にする
(setq emacs-ime "canna")
  ;;; remix 以外(egg-canna,egg-wnn)の場合の設定
(defun customize-egg-canna ()
(if (equal emacs-ime "canna")
      (setq canna-hostname "localhost")
      (setq default-input-method "japanese-egg-canna") 
      ;;; emcws のCANNAのコマンドを使う
      (add-hook 'canna-load-hook '(lambda () 
				    (load "egg-canna")
				    (customize-egg-canna)))
      (defun canna-f1-mode ()
	(canna-kigou-mode))
      (defun canna-f3-mode ()
	(canna-bushu-mode))
      (defun canna-f12-mode ()
	(canna-extend-mode))
	    (global-set-key [f1] 'canna-f1-mode)
	    (global-set-key [f3] 'canna-f3-mode)
	    (global-set-key [f12] 'canna-f12-mode)
	    (make-face 'canna-face)
	    (make-face 'canna-conversion-face)
	    (set-face-foreground 'canna-face "darkblue")
	    (set-face-foreground 'canna-conversion-face "white")
	    (set-face-background 'canna-face "lightcyan1")
;	    (set-face-bold-p 'canna-conversion-face t)
;	    (set-face-inverse-video-p 'canna-conversion-face t)
	    (set-face-background 'canna-conversion-face "royalblue")
	    (set-face-underline 'canna-face t)
;	    (set-face-underline 'canna-conversion-face t)
	    ;;; egg-cannaでつかうfaceに設定
	    (setq its-fence-face 'canna-face)
	    (setq egg-conversion-face 'canna-conversion-face)
	  (global-set-key "\e[11~" 'canna-f1-mode)
	  (global-set-key "\e[13~" 'canna-f3-mode)
	  (global-set-key "\e[24~" 'canna-f12-mode)))
(if (and (boundp 'CANNA) CANNA) ; 『かんな/emacs』であることを確認
      (load-library "canna")
      (canna)
      (setq canna-use-color t)
      (global-set-key "\C-_" 'canna-undo)  ;アンドゥの設定。
      (setq canna-save-undo-text-predicate ;アンドゥバッファへ入れる条件
      (setq canna-undo-hook ;アンドゥ+α。
               (canna-do-function canna-func-henkan)) )
      ;;(define-key canna-mode-map [backspace] [?\C-h])
      ;;(define-key canna-mode-map [delete] [?\C-h])
      ;;(define-key canna-mode-map [?\177] [?\C-h])
	     (define-key canna-mode-map [delete] [?\C-d])
	     (define-key canna-mode-map [backspace] [?\C-h])
	     (define-key canna-mode-map [?\177] [?\C-r])
		 (define-key canna-mode-map [8] [?\C-d])

$ grep -i canna .canna
;;  Plamo Linux ユーザ設定ファイルサンプル for canna
(setq canna-input-method "roma")
;(setq canna-input-method "kana")
 "gcanna"
 "gcannaf"
(if (equal canna-input-method "kana")
  (if (equal canna-input-method "kana")

-- 
松井

Follow-Ups
[plamo:26356] Re: emacs-canna(20.7), Shun-ichi TAHARA (田原 俊一)

[検索ページ] [メール一覧]
Plamo ML 公開システム