🚀 go-pugleaf

$B$O$8$a$^$7$F!#FbF#!w7DBgLp>e$H?=$7$^$9!#(B

In article <MASUTANI.92Sep11140254@balios.wrc.honda.co.jp> masutani@wrc.honda.co.jp writes:

 |$BKqC+!wK\ED5;=Q8&5f=j$H?=$7$^$9!#(B
 |
 |$B#I#R#I#S$N%-(B$B!<%P%$%s%I$K4X$9$k<ALd$G$9!#:G6a(B IRIS 4D $B$H$$$&%^%7%s(B
 |$B$r;H$$;O$a$?$N$G$9$,!"(Bnemacs $B$GIQHK$K;H$&(B ontrol key $B$,2!$7$E$i$/(B
 |$B$F6l$7$s$G$$$^$9!J2<?^!K!#(B
 |
 |		  $B(#(!(!(!(!(!($(#(!($(#(!($(B
 |	  $B(-(B	$B("(B Caps Lock$B("("#A("("#S("(B
 |	  $B(-(B	$B(&(!(!(!(!(!(%(&(!(%(&(!(%(B
 |	  $B(-(B	$B(#(!(!(!(!(!(!(!($(#(!($(#(!($(B
 |	  $B(-(B	$B("(B $B",(B Shift     $B("("#Z("("#X("(B
 |	  $B(-(B	$B(&(!(!(!(!(!(!(!(%(&(!(%(&(!(%(B
 |	  $B(-(B	$B(#(!(!(!($(B       	$B(#(!(B$B(!($(#(!(!(!(!(!(B
 |	  $B(-(B	$B("(B Ctrl $B("(B         	$B("(B Alt$B("("(B
 |	  $B(-(B	$B(&(!(!(!(%(B         	$B(&(!(!(%(&(!(!(!(!(B$B(!(B
 |	  $B(1(,(,(,(,(,(,(,(,(,(,(,(,(,(,(,(,(,(,(,(,(,(B
 |
 |$B$=$3$G!"(BCaps Lock $B$r(B Ctrl $B$NBe$o$j$K;H$$$?$$(B$B$N$G$9$,!"$I$J$?$+$=$N(B
 |$BJ}K!$r65$($F$$$?$@$1$^$;$s$G$7$g$&$+!)(B
 |	  1. nemacs $B$N$J$+$@$1(B
 |	  2. $B>o$K(B
 |$B$N$I$A$i$G$b9=$$$^$;$s!##O#S$O(B IRIX System V Release 3.3.2 $B$G$9!#(B

$B;d$bF1$8LdBj$GG:$s$G$*$j$^$7$?$,(B$B!"(BX$B$N(Bxmodmap$B$H$$$&%3%^%s%I$r;H$&$3$H$G!"(B
$B!V>o$K!W%-!<%^%C%W$rJQ$($k$3$H$,$G$-$^$7$?!#(B

$B$^$:!"(B
% xmodmap -pk
$B$H$7$F!"8=:_$N%-!<%^%C%W$rI=<($7!"JQ99$7$?$$%-!<$r3NG'$7$^$9!#$=$7$F!"(B
xmodmap$B$KBP$7$F%U%!%$%k(B$B$GJQ99L?Na$rM?$($^$9!#(B

% xmodmap .xmodmaprc

$B;29M$^$G$K;d$N%U%!%$%k(B(.xmodmaprc)$B$r>R2p$7$F$*$-$^$9!#(B

----$B$3$3$+$i(B----
remove Lock = Caps_Lock
remove Control = Control_L
keycode 10 = Caps_Lock
keycode 11 = Control_L
keycode 14 = grave asciitilde
keycode 91 = grave asciitilde
keycode 62 = Escape
add Lock = Caps_Lock
add Control = Control_L
---$B$3$3$^$G(B---

$B$3$3$G$O!"(BESC$B$bJQ99$7$F$$$^$9!#$^$?!"(B"~"$B$O$&$^$/(B$BJQ99$G$-$J$+$C$?$N$G!"(B
$B%^%C%-%s%H%C%7%eIw$KJQ99$7$F$"$j$^$9!#(B
--
      $B!y(B              $B7DXf5A=NBg3XBg(B$B3X1!(B $BM}9)3X8&5f2J(B             $B!y(B
      $B!z(B             $B7W;;5!2J3X@l96(B $B=$;N#1G/(B  $B=j8&5f<<(B            $B!z(B
      $B!y(B                  $BFbF#(B $B9d?M(B / Taketo Naito		  $B!y(B
      $B!z(B           E-mail address : naito@mt.cs.keio.ac.jp	  $B!z(B


 

In article <MASUTANI.92Sep11140254@balios.wrc.honda.co.jp> masutani@wrc.honda.co.jp writes:

 |> $@KqC+!wK\ED5;=Q8&5f=j$H?=$7$^$9!#(J
 ...
 |> $@$=$3$G!"(JCaps Lock $@$r(J Ctrl $@$NBe$o$j(J$@$K;H$$$?$$$N$G$9$,!"$I$J$?$+$=$N(J
 |> $@J}K!$r65$($F$$$?$@$1$^$;$s$G$7$g$&$+!)(J
 |> 	    1. nemacs $@$N$J$+(J$@$@$1(J
 |> 	    2. $@>o$K(J
 |> $@$N$I$A$i$G$b9=$$$^$;$s!##O#S$O(J IRIX System V Release 3.3.2 $@$G$9!#(J

IRIX3.3.2$@$O(JNeWS$@%&%#%s%I%&3HD%$N(J4SightWindow$@$J$N$G(JX$@$N@_DjJ}K!$O;H$($^$;$s!#(J
$@%[!<%`!&%G%#%l%/%H%j$N(Jstartup.ps$@$K(J$@<!$N$b$N$rF~$l$F$_$F2<$5$$!#(J
$@0JA0(Jcomp.sys.sgi$@$KN.$l$F$$$?$b$N$G$9!#(J

--- $@$O$8$^$j(J ---
/replacekeys { % origkeyvals_array changedkeyvals_array -> -
        {
                /changedvals exch def
                /origvals exch def
                /keysdict origvals length dict def
                keysdict begin
                        0 1 origvals length 1 sub {
                                dup origvals exch get changedvals
                                3 2 roll get def
                        } for
                end
                createevent dup begin
                        /Name origvals def
                        /Priority 2 def
                        /Exclusivity true def
                end
                expressinterest
                {
                        awaitevent dup dup begin
                        /Name get keysdict exch get /Name exch def
                        end
                        redistributeevent
                } loop
        } fork pop pop pop
} def

% lcap	    ctrl
[ 28420 ] [ 28419 ] replacekeys

--- $@$*$o$j(J ---

IRIX4.0.x$@$J$i(J.xsession$@$K!"(J

    /usr/bin/X11/xmodmap -e 'add control = Caps_Lock'

$@$rF~$l$F$*$/$@$1$G$$$$$G$7$g$&!#(J
--
matumot@nkk.co.jp (matumot%nkk.co.jp@uunet.uu.net)
Masayuki Matsumoto
Electronics Div., NKK corporation