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

[debian-users:22166] Re: I cannot use SKK.

和田＠酩酊中です. 

一応ご指示通りやってみたつもりですが, 理解不足が多々あると思うのでおか
しなことをしていたらご教導下さい. 

From: Takao KAWAMURA <kawamura@debian.org>
Subject: [debian-users:22158] Re: I cannot use SKK.
Date: Sun, 30 Apr 2000 20:33:41 +0900

> > 昨日 apt-get upgrade したら, SKK の変換がおかしくなりました.  恐らく 
> > ~/.skk-jisyo にのっているであろう単語の漢字変換はできるのですが, それ
> > 以外の漢字に変換をしようと space を押し続けると,
> > 
> > Wrong type argument: number-or-marker-p, nil
> > 
> > となって変換がでません. 例えば, 「カンジ」を変換しようとしても,
> > ~/.skk-jisyo にのっている「漢字」以外に変換されません.
> 
> ~/.emacsのSKK関連部分と、(存在するなら)~/.skkを教えてくださ
> い。

以下です. 

~/.emacs 抄
(if (not (boundp 'MULE))
  (progn
    (load "skk-leim")
    (if (featurep 'xemacs)
      (select-input-method "japanese-skk")
      (set-input-method "japanese-skk")
    )
    (toggle-input-method nil)
  )
)

~/.skk
(skk-make-face 'DimGray/PeachPuff1)
(setq skk-henkan-face 'DimGray/PeachPuff1)
(setq skk-auto-insert-paren t)
(setq skk-rom-kana-rule-list '(("!" nil "!") ("," nil ", ")
			       ("." nil ". ") ("?" nil "?")
                               ("$" nil "$")))
(setq skk-mode-hook
      (function
       (lambda ()
	   (if (or (eq major-mode 'plain-TeX-mode)
		   (eq major-mode 'LaTeX-mode))
	       (j-tex-mode-map t)
	     ))))
(defun j-tex-mode-map (&optional skk-called)
  (interactive)
  (or skk-called (skk-mode 1))
  (define-key skk-j-mode-map "\\" 'j-tex-command)
  (define-key skk-j-mode-map "$" 'j-tex-dollar)
  (define-key skk-j-mode-map "\{" 'j-tex-left-brace)
  (define-key skk-j-mode-map "\}" 'self-insert-command)
  )
(defun j-tex-command ()
  (interactive)
  (skk-mode-off)
  (insert "\\"))
(defun j-tex-dollar ()
  (interactive)
  (skk-mode-off)
  (insert "$"))
(defun j-tex-left-brace ()
  (interactive)
  (skk-mode-off)
  (insert "\{"))
(defun j-tex-right-brace ()
  (interactive)
  (skk-mode-off)
  (insert "\}"))

> それと、*scratch*で(setq debug-on-error t)を評価してからエラー
> を起こしたときに得られる*Backtrace*バッファの内容も教えてく
> ださい。

# Emacs Lisp の評価って Ctrl-j でしたよね. 

*Backtrace* バッファの内容 (文字コード: iso-2022-jp-2-unix)
Signaling: (wrong-type-argument number-or-marker-p nil)
  skk-search-jisyo-file-1(nil 10000)
  skk-search-jisyo-file("/usr/share/skk/SKK-JISYO.L" 10000)
  eval((skk-search-jisyo-file skk-large-jisyo 10000))
  skk-search()
  skk-henkan-1()
  byte-code(".Aテ ND 	NE!NC [new-word skk-kakutei-flag kakutei-henkan skk-henkan-1 skk-henkan-in-minibuff skk-insert-new-word] 2)
  skk-henkan()
  ad-Orig-skk-start-henkan(1)
  (setq ad-return-value (ad-Orig-skk-start-henkan arg))
  (if skk-abbrev-mode (progn (setq ad-return-value ...) (skk-cursor-set-properly)) (setq ad-return-value (ad-Orig-skk-start-henkan arg)))
  (let (ad-return-value) (if skk-abbrev-mode (progn ... ...) (setq ad-return-value ...)) ad-return-value)
  skk-start-henkan(1)
  ad-Orig-skk-insert(1)
  (setq ad-return-value (ad-Orig-skk-insert arg))
  (if skk-abbrev-mode (progn (setq ad-return-value ...) (skk-cursor-set-properly)) (setq ad-return-value (ad-Orig-skk-insert arg)))
  (let (ad-return-value) (if skk-abbrev-mode (progn ... ...) (setq ad-return-value ...)) ad-return-value)
  skk-insert(1)
  call-interactively(skk-insert)

> $B$"$H!"2<5-$N%Q%C%A$r(B/etc/emacs/site-start.d/50ddskk.el$B$K$"$F(B
> $B$F(BEmacs$B$r:F5/F0$7!"$&$^$/F0$/$+$I$&$+65$($F$/$@$5$$!#(B

% sudo patch < diff-file
$B$7$F(B Emacs $B$r:F5/F0$7$?$i$&$^$/F0$/$h$&$K$J$j$^$7$?(B. $BG0$N$?$a(B, emacs
$B$N(B version $B$b(B. 

% dpkg -l '*emacs*' | grep ii
ii  emacs-lisp-int 1.05+0.96-4    Japanese version of "Programming in Emacs Li
ii  emacs20-dl     20.6-6         The GNU Emacs editor. (Dynamic Loading suppo
ii  emacs20-dl-el  20.6-6         GNU Emacs LISP (.el) files. (for emacs20-dl)
ii  emacsen-common 1.4.11         Common facilities for all emacsen.

$B0J>e$G$9(B. $B$h$m$7$/$*4j$$$7$^$9(B. 

$BOBED(B