This file is indexed.

/usr/share/doc/HOWTO/ja-html/mouse-wheel-scroll-13.html is in doc-linux-ja-html 2006.05.25-1.1.

This file is owned by root:root, with mode 0o644.

The actual contents of the file can be viewed below.

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 3.2 Final//EN">
<HTML>
<HEAD>
 <META NAME="GENERATOR" CONTENT="SGML-Tools 1.0.9">
 <TITLE> X mouse wheel scroll: TCL / TK ¥¢¥×¥ê¥±¡¼¥·¥ç¥ó</TITLE>
 <LINK HREF="mouse-wheel-scroll-14.html" REL=next>
 <LINK HREF="mouse-wheel-scroll-12.html" REL=previous>
 <LINK HREF="mouse-wheel-scroll.html#toc13" REL=contents>
</HEAD>
<BODY>
<A HREF="mouse-wheel-scroll-14.html">¼¡¤Î¥Ú¡¼¥¸</A>
<A HREF="mouse-wheel-scroll-12.html">Á°¤Î¥Ú¡¼¥¸</A>
<A HREF="mouse-wheel-scroll.html#toc13">Ìܼ¡¤Ø</A>
<HR>
<H2><A NAME="s13">13. TCL / TK ¥¢¥×¥ê¥±¡¼¥·¥ç¥ó</A></H2>

<P>
<A HREF="mailto:bruce@cenderis.demon.co.uk">Bruce Stephens</A>
¤«¤é¤Î¾ðÊó¡§ ¤³¤Î¥³¡¼¥É¤ò¥Õ¥¡¥¤¥ë¡¢Î㤨¤Ð &nbsp;/.mscroll.tcl ¤ÎÃæ¤ËÆþ¤ì¤Þ¤¹¡£
¤½¤·¤Æ¤³¤ì¤ò source &nbsp;/.mscroll.tcl ¤È¤·¤Æ tcl ¥¢¥×¥ê¥±¡¼¥·¥ç¥ó¤ÎÃæ¤Ç
¥¤¥ó¥¯¥ë¡¼¥É¤·¤Þ¤¹¡£ 
<PRE>
proc mscroll {bindtag} {
    bind $bindtag &lt;Button-5> [list %W yview scroll 5 units]
    bind $bindtag &lt;Button-4> [list %W yview scroll -5 units]
    bind $bindtag &lt;Shift-Button-5> [list %W yview scroll 1 units]
    bind $bindtag &lt;Shift-Button-4> [list %W yview scroll -1 units]
    bind $bindtag &lt;Control-Button-5> [list %W yview scroll 1 pages]
    bind $bindtag &lt;Control-Button-4> [list %W yview scroll -1 pages]
}
</PRE>
<P>¤½¤·¤Æ¡¢¿·¤·¤¯ÄêµÁ¤¹¤ë´Ø¿ô¤Ø¤Î¥Ñ¥é¥á¡¼¥¿¤È¤·¤Æ¡¢¤½¤ì¤é¤òÍ¿¤¨¤ë¤³¤È¤Ë
¤è¤Ã¤Æ¡¢´õ˾¤¹¤ë¥¦¥£¥¸¥§¥Ã¥È¾å¤Ç¥Ð¥¤¥ó¥Ç¥£¥ó¥°¤òÀë¸À¤·¤Þ¤¹¡£Î㤨¤Ð
TkMan ¤ÎºÇ¸å¤Ë²¼µ­¤òÄɲä·¤Þ¤¹¡£ 
<PRE>
source ~/.mscroll.tcl
mscroll Text
</PRE>
<P>
<H2><A NAME="ss13.1">13.1 exmh</A>
</H2>

<P>exmh ¤Ç¤Ï¡¢&nbsp;/.tk/exmh/user.tcl ¤ÎÃæ¤Ç¼¡¤Î¤è¤¦¤Ë¤·¤Þ¤¹¡§ 
<PRE>
source ~/.mscroll.tcl
proc User_Init {} {
    mscroll TScroll
}
proc User_Layout {} {
    mscroll .ftoc.t
}
</PRE>
<P>¼¡¤Ë¥í¥°¥¦¥£¥ó¥É¥¦¤ÎTcl ¤Î¥×¥í¥ó¥×¥È¤Ç°Ê²¼¤Î¥³¥Þ¥ó¥É¤òÆþÎϤ¹¤ëɬÍפ¬¤¢¤ê
¤Þ¤¹ (menu Pref/Hack support/)¡£
<PRE>
auto_mkindex .tk/exmh/ 
</PRE>

¤½¤·¤Æ exmh ¤òºÆµ¯Æ°¤·¤Æ¤¯¤À¤µ¤¤¡£
<P>
<P>
<HR>
<A HREF="mouse-wheel-scroll-14.html">¼¡¤Î¥Ú¡¼¥¸</A>
<A HREF="mouse-wheel-scroll-12.html">Á°¤Î¥Ú¡¼¥¸</A>
<A HREF="mouse-wheel-scroll.html#toc13">Ìܼ¡¤Ø</A>
</BODY>
</HTML>