🚀 go-pugleaf

ありがとうございます．　うまくいきました．

ストールマンやみなさんはカーソル移動って
C-p C-b C-f C-nなのでしょうか？
----------------------------
山﨑　清美 (Kiyomi Yamazaki)

KATAYAMA Yoshio <kate@pfu.co.jp> wrote in message
news:KATE.00Jan27160338@yamato.trad.pfu.co.jp...
> 片山＠ＰＦＵです。
>
> In article <86o949$oai$1@nn-tk106.ocn.ad.jp>,
> "Kiyomi Yamazaki" <kiyomiy@ai-com.co.jp> writes:
>
> >.emacsに以下のように記述しました
> >(global-set-key "\C-i" 'previous-line )
> >(global-set-key "\C-k" 'next-line )
> >(global-set-key "\C-l" 'forward-char )
> >(global-set-key "\C-j" 'backward-char )
> >C-jだけが機能せず、C-jを押下すると改行が機能してしま
> >います．KeyBindの一覧を見てもC-jは抜けています．　
>
> Major Mode Bindings の中に LFD のバインドがあるのだと思います。
> lisp モードや C モードでは、C-i なども効かなくなるはずです。
>
> >C-jに機能を割り当てるには何か必要なのでしょうか？
>
> メジャーモードには関係なく常に上記のバインドにしたい（メジャーモー
> ドの機能は使わない）というのであれば、minor-mode-map を使うこと
> ができますが、そういうことではないと思います。
>
> 数多くあるメジャーモードのすべてでキーバインドを定義し直すのは現
> 実的ではありませんから、keyboard-translate-table を使ってキーマッ
> プそのものを変えるのがよいでしょう。
>
> ――――ここから――――ここから――――ここから――――ここから――――
> (setq keyboard-translate-table
>       (let* ((table (make-string 32 0))
>      (i (length table)))
> (while (> i 0)
>   (setq i (1- i))
>   (aset table i i))
> (aset table ?\C-i ?\C-p)
> (aset table ?\C-k ?\C-n)
> (aset table ?\C-l ?\C-f)
> (aset table ?\C-j ?\C-b)
>
> (aset table ?\C-p ?\C-i)
> (aset table ?\C-n ?\C-k)
> (aset table ?\C-f ?\C-l)
> (aset table ?\C-b ?\C-j)
> table))
> ――――ここまで――――ここまで――――ここまで――――ここまで――――
>
> “(aset table ?\C-i ?\C-p)”は、C-i を押すと C-p が通知されるよ
> うにキーマップを変更します。
>
> この例では、C-i ⇔ C-p、C-k ⇔ C-n、C-l ⇔ C-f、C-j ⇔ C-b とキー
> を入れ換えています。
>
> この入れ換えは常に起こるので、例えば、C-x C-f は C-x C-l になり
> ます。
> --
> 片山＠ＰＦＵ