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
|
=head1 NAME
Tk::ROText - 'readonly' perl/Tk Text widget
=for pm Tk/ROText.pm
=for category Derived Widgets
=head1 SYNOPSIS
use Tk::ROText;
...
$ro = $mw->ROText(?options,...?);
=head1 DESCRIPTION
This "I<IS A>" text widget with all bindings removed that would alter
the contents of the text widget. The contents can still be modified
via method calls.
=head2 BINDINGS
Only read-only bindings from L<Tk::Text> are available in
B<Tk::ROText>. Additionally the following bindings are defined:
=over
=item <space>
Move the cursor forward by one screenful.
=item <BackSpace>
Move the cursor backward by one screenful.
=back
=head1 KEYWORDS
widget, text, readonly
=head1 SEE ALSO
L<Tk::Text>
=cut
|
