🚀 go-pugleaf

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

In article <398E392F.A50A390C@mail.ecc.u-tokyo.ac.jp>,
	IIJIMA 'Delmonta' Hiromitsu <L94102@mail.ecc.u-tokyo.ac.jp> writes:

>	$B$K$O!"(Bkanainput $B$N;H$$J}$H$7$F!"(B~/.emacs $B$K(B

>	(load "kanainput")	;$B<B:]$K$O(B XEmacs $B$G$O(B "its-kanainput"$B!"(B
>				;Mule 2.3 $B$d(B emcws $B$G$O(B "its/kanainput"
>       	(setq its:*standard-modes*
>       	    (append (list (its:get-mode-map "kanainput")
>       	                     its:*standard-modes*)))
>       	(setq-default its:*current-map* (its:get-mode-map "kanainput"))

>        $B$H=q$1!"$H=q$$$F$"$j$^$9!#(B
>	$B$,!"$3$3$N(B setq $BJ8$O$h$/8+$k$H8m$j$G!"@5$7$/$O(B

>                (setq its:*standard-modes*
>                        (append (its:get-mode-map "kanainput")
>                                (list its:*standard-modes*)))
>	$B$H$J$j$^$9!J(Blist $B4X?t$rCV$/>l=j$,0c$&!K!#(B

$B%=!<%9$N%3%a%s%H$bHSEh$5$s$ND{@5$b(B C-x C-k >$B!"(BC-x C-k < $B$,F0:n$7(B
$B$J$/$J$j$^$9!#(B

its:*standard-modes* $B$O!"(BITS $B%^%C%W!J(Bits:get-mode-map $B$N4X?tCM!K(B
$B$N%j%9%H$G$9$+$i!"(B

(setq its:*standard-modes*
      (append (list (its:get-mode-map "kanainput"))
                    its:*standard-modes*))

$B$"$k$$$O(B

(setq its:*standard-modes*
      (cons (its:get-mode-map "kanainput")
            its:*standard-modes*))

$B$,@5$7$$$G$9!#(B

>	$B$r;XE&$7!"$=$N7k2L!"(Bemcws $B$K$OH?1G$7$F$$$?$@$-$^$7$?!J(BTamago4
>	$B$G$O(B kanainput $B<+BN$,L$<BAu$J$N$G!"<BAu$KAH$_9~$^$l$k$H$-$K$O(B
>	$B$?$V$sH?1G$5$l$k$G$7$g$&!K$,!"$=$l$+$iH>G/7P$C$F$b!"(BXEmacs $BMQ$N(B

Tamago 4 $B$G$O(B its:*standard-modes* $B$KAjEv$9$kJQ?t<+BN$,B8:_$7$F(B
$B$$$^$;$s!"!"!"$H8@$&$+!"$3$l$r;H$C$F$$$k(B its:next-mode $B$KBP1~$9(B
$B$k(B its-next-map $B$,L$<BAu$G$9!#%-!<%P%$%s%I$O$7$F$"$k$s$G$9$,!"4X(B
$B?t$,$"$j$^$;$s!#<BAu$7$?$$!?$7$FM_$7$$$H$$$&@<$,$J$/!"8e2s$7$K$J$C(B
$B$?$^$^$G$9!#(B

$B$"$H!"(Bkanainput $B$b8e2s$7$K$J$C$?$^$^!"!"!"(B
--
$BJR;3!w#P#F#U(B