🚀 go-pugleaf

$BJR;3!w#P#F#U$G$9!#(B

In article <86o949$oai$1@nn-tk106.ocn.ad.jp>,
	"Kiyomi Yamazaki" <kiyomiy@ai-com.co.jp> writes:

>.emacs$B$K0J2<$N$h$&$K5-=R$7$^$7$?(B
>(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$B$@$1$,5!G=$;$:!"(BC-j$B$r2!2<$9$k$H2~9T$,5!G=$7$F$7$^(B
>$B$$$^$9!%(BKeyBind$B$N0lMw$r8+$F$b(BC-j$B$OH4$1$F$$$^$9!%!!(B

Major Mode Bindings $B$NCf$K(B LFD $B$N%P%$%s%I$,$"$k$N$@$H;W$$$^$9!#(B
lisp $B%b!<%I$d(B C $B%b!<%I$G$O!"(BC-i $B$J$I$b8z$+$J$/$J$k$O$:$G$9!#(B

>C-j$B$K5!G=$r3d$jEv$F$k$K$O2?$+I,MW$J$N$G$7$g$&$+!)(B

$B%a%8%c!<%b!<%I$K$O4X78$J$/>o$K>e5-$N%P%$%s%I$K$7$?$$!J%a%8%c!<%b!<(B
$B%I$N5!G=$O;H$o$J$$!K$H$$$&$N$G$"$l$P!"(Bminor-mode-map $B$r;H$&$3$H(B
$B$,$G$-$^$9$,!"$=$&$$$&$3$H$G$O$J$$$H;W$$$^$9!#(B

$B?tB?$/$"$k%a%8%c!<%b!<%I$N$9$Y$F$G%-!<%P%$%s%I$rDj5A$7D>$9$N$O8=(B
$B<BE*$G$O$"$j$^$;$s$+$i!"(Bkeyboard-translate-table $B$r;H$C$F%-!<%^%C(B
$B%W$=$N$b$N$rJQ$($k$N$,$h$$$G$7$g$&!#(B

$B!=!=!=!=$3$3$+$i!=!=!=!=$3$3$+$i!=!=!=!=$3$3$+$i!=!=!=!=$3$3$+$i!=!=!=!=(B
(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))
$B!=!=!=!=$3$3$^$G!=!=!=!=$3$3$^$G!=!=!=!=$3$3$^$G!=!=!=!=$3$3$^$G!=!=!=!=(B

$B!H(B(aset table ?\C-i ?\C-p)$B!I$O!"(BC-i $B$r2!$9$H(B C-p $B$,DLCN$5$l$k$h(B
$B$&$K%-!<%^%C%W$rJQ99$7$^$9!#(B

$B$3$NNc$G$O!"(BC-i $B"N(B C-p$B!"(BC-k $B"N(B C-n$B!"(BC-l $B"N(B C-f$B!"(BC-j $B"N(B C-b $B$H%-!<(B
$B$rF~$l49$($F$$$^$9!#(B

$B$3$NF~$l49$($O>o$K5/$3$k$N$G!"Nc$($P!"(BC-x C-f $B$O(B C-x C-l $B$K$J$j(B
$B$^$9!#(B
--
$BJR;3!w#P#F#U(B