🚀 go-pugleaf

$B$[$7!w$($9$"!<$k$(!<$G$9!#(B

In article <Dr652n.93K@TokyoNet.AD.JP>
         yoshihama@kk-sec.co.jp writes:

> $B;d$O(BTcl7.3$B!\(BTk3.6$B$r;HMQ$7$?%"%W%j%1!<%7%g%s$r:n$C$F$$$k$N$G$9$,(B
> $B0J2<$N8=>]$KG:$^(B$B$5$l$F$$$^$9!#(B

$B;EMM$G$9!#$C$F$N$OL5M}$@$h$J$"(B...

> $B!&(BCapsLock$B%-!<$r2!$7$?>uBV$@$H!"%9%/%m!<%k%P!<$N(B$BA`:n$,$G$-$J$$!#(B
>   $B$?$@$7!"%9%/%m!<%k%P!<>e$K%^%&%9%]%$%s%?$r0\F0$9$k$H!"%"%/%F%#%V$J(B
>   $B?'$K$J$k$N(B$B$G!"(B<Any-Enter> $B%$%Y%s%H$K$OH?1~$7$F$$$k$3$H$,J,$+$k!#(B

$B0JA0Ej9F$7$?%Q%C%A$r$D$1$F$*$-$^$9!#(B
$B$A$J$_$K(B$B!"(BScale $B$G$bF1$8$3$H$,5/$3$j$^$9!#(B

> $B!&(BNumLock$B%-!<$r2!$7$?>uBV$@$H!"%9%/%m!<%k%P!<$NB>!"%\%?%s!"%j%9(B$B%H(B
>   $B%\%C%/%9$J$I$[$H$s$IA4$F$N%&%#%8%'%C%H$,%^%&%9$N%$%Y%s%H$KH?1~(B
>   $B$7$J$/$J$k!#(B

$B$3$l$OCN$j$^$;(B$B$s$G$7$?!#(B($B;d$N%-!<%\!<%I$K$=$s$J$b$N$O(B
$B$J$$$N$G(B...)

> $B$A$J$_$K!"F|K\8l2=%Q%C%A!J!A(Bupdate3$B$^$G!K$rEv(B$B$F$?$b$N$H!"F|K\8l2=(B
> $B$7$F$$$J$$$b$N$NN>J}$G;n$7$^$7$?$,!"F1MM$N8=>]$G$7$?!#(B

$BF|K\8l%Q%C%A$G$O!"%$%Y(B$B%s%H$NG[Aw$K4X$7$F$O$$$8$C$F$J$$(B
$B$N$G!"1Q8lHG!&F|K\8lHG$H$b$K5/$3$kH&$G$9!#(B

> $B$^$?!"(BTcl7.4+Tk4.0$B$G$O(B$B$3$N8=>]$OH/@8$7$^$;$s!#(B
> $B$D$^$j!"(BCapsLock$B!?(BNumLock$B$NM-L5$K4X$o$i$:!"@5>o$KF0:n$7$^$9!#(B

Tk 4.0 $B0J9_(B$B$G$OD>$C$F$$$k$N$G!"(B4.0 $B0J9_$r$*;H$$2<$5$$!#(B

$B!t(B $B$9$G$K(B 4.1 $B$b=P$?$3$H$@$7(B...

$B$[$7(B

---------- cut here ---------- cut here ---------- cut here ----------
*** tkScrollbar.c.orig  Thu Oct 28 09:13:17 1993
--- tkScrollbar.c       Tue Nov 22 17:09:21 1994
***************
*** 996,1002 ****
                    eventPtr->xmotion.y));
        }
      } else if ((eventPtr->type == ButtonPress)
!           && (eventPtr->xbutton.state == 0)) {
        /*
         * The following procedure call is only necessary for OpenWindows 2.0
         * because it seems to send ButtonPress events to scrollbars
--- 996,1004 ----
                    eventPtr->xmotion.y));
        }
      } else if ((eventPtr->type == ButtonPress)
!           && ((eventPtr->xbutton.state &
!                (Button1Mask | Button2Mask | Button3Mask | Button4Mask |
!                 Button5Mask)) == 0)) {
        /*
         * The following procedure call is only necessary for OpenWindows 2.0
         * because it seems to send ButtonPress events to scrollbars
*** tkScale.c.orig      Tue Aug 17 07:47:52 1993
--- tkScale.c   Tue Nov 22 17:21:41 1994
***************
*** 1387,1393 ****
                eventPtr->xmotion.x, eventPtr->xmotion.y));
      } else if ((eventPtr->type == ButtonPress)
            && (eventPtr->xbutton.button == Button1)
!           && (eventPtr->xbutton.state == 0)) {
        scalePtr->flags |= BUTTON_PRESSED;
        SetScaleValue(scalePtr, PixelToValue(scalePtr,
                eventPtr->xbutton.x, eventPtr->xbutton.y));
--- 1387,1395 ----
                eventPtr->xmotion.x, eventPtr->xmotion.y));
      } else if ((eventPtr->type == ButtonPress)
            && (eventPtr->xbutton.button == Button1)
!           && ((eventPtr->xbutton.state &
!                (Button1Mask | Button2Mask | Button3Mask | Button4Mask |
!                 Button5Mask)) == 0)) {
        scalePtr->flags |= BUTTON_PRESSED;
        SetScaleValue(scalePtr, PixelToValue(scalePtr,
                eventPtr->xbutton.x, eventPtr->xbutton.y));