.\" Automatically generated by Pod::Man 2.28 (Pod::Simple 3.29)
.\"
.\" Standard preamble:
.\" ========================================================================
.de Sp \" Vertical space (when we can't use .PP)
.if t .sp .5v
.if n .sp
..
.de Vb \" Begin verbatim text
.ft CW
.nf
.ne \\$1
..
.de Ve \" End verbatim text
.ft R
.fi
..
.\" Set up some character translations and predefined strings.  \*(-- will
.\" give an unbreakable dash, \*(PI will give pi, \*(L" will give a left
.\" double quote, and \*(R" will give a right double quote.  \*(C+ will
.\" give a nicer C++.  Capital omega is used to do unbreakable dashes and
.\" therefore won't be available.  \*(C` and \*(C' expand to `' in nroff,
.\" nothing in troff, for use with C<>.
.tr \(*W-
.ds C+ C\v'-.1v'\h'-1p'\s-2+\h'-1p'+\s0\v'.1v'\h'-1p'
.ie n \{\
.    ds -- \(*W-
.    ds PI pi
.    if (\n(.H=4u)&(1m=24u) .ds -- \(*W\h'-12u'\(*W\h'-12u'-\" diablo 10 pitch
.    if (\n(.H=4u)&(1m=20u) .ds -- \(*W\h'-12u'\(*W\h'-8u'-\"  diablo 12 pitch
.    ds L" ""
.    ds R" ""
.    ds C` ""
.    ds C' ""
'br\}
.el\{\
.    ds -- \|\(em\|
.    ds PI \(*p
.    ds L" ``
.    ds R" ''
.    ds C`
.    ds C'
'br\}
.\"
.\" Escape single quotes in literal strings from groff's Unicode transform.
.ie \n(.g .ds Aq \(aq
.el       .ds Aq '
.\"
.\" If the F register is turned on, we'll generate index entries on stderr for
.\" titles (.TH), headers (.SH), subsections (.SS), items (.Ip), and index
.\" entries marked with X<> in POD.  Of course, you'll have to process the
.\" output yourself in some meaningful fashion.
.\"
.\" Avoid warning from groff about undefined register 'F'.
.de IX
..
.nr rF 0
.if \n(.g .if rF .nr rF 1
.if (\n(rF:(\n(.g==0)) \{
.    if \nF \{
.        de IX
.        tm Index:\\$1\t\\n%\t"\\$2"
..
.        if !\nF==2 \{
.            nr % 0
.            nr F 2
.        \}
.    \}
.\}
.rr rF
.\" ========================================================================
.\"
.IX Title "More 3pm"
.TH More 3pm "2016-02-14" "perl v5.22.1" "User Contributed Perl Documentation"
.\" For nroff, turn off justification.  Always turn off hyphenation; it makes
.\" way too many mistakes in technical documents.
.if n .ad l
.nh
.SH "NAME"
Tk::More \- a 'more' or 'less' like text widget
.SH "SYNOPSIS"
.IX Header "SYNOPSIS"
.Vb 1
\&    use Tk::More;
\&
\&    $more = $parent\->More(...text widget options ...);
\&    $more\->Load(FILENAME);
.Ve
.SH "DESCRIPTION"
.IX Header "DESCRIPTION"
\&\fBTk::More\fR is a readonly text widget with additional key bindings as
found in UNI* command line tools \f(CW\*(C`more\*(C'\fR or \f(CW\*(C`less\*(C'\fR. As in \f(CW\*(C`more\*(C'\fR an
additional status/command line is added at the bottom.
.SH "ADDITIONAL BINDINGS"
.IX Header "ADDITIONAL BINDINGS"
.IP "Key-g or Home" 4
.IX Item "Key-g or Home"
goto beginning of file
.IP "Key-G or End" 4
.IX Item "Key-G or End"
goto end of file
.IP "Key-f or Next" 4
.IX Item "Key-f or Next"
forward screen
.IP "Key-b or Prior" 4
.IX Item "Key-b or Prior"
backward screen
.IP "Key-k or Up" 4
.IX Item "Key-k or Up"
up one line
.IP "Key-j or Down" 4
.IX Item "Key-j or Down"
down one line
.IP "Key\-/" 4
.IX Item "Key-/"
search forward
.IP "Key\-?" 4
.IX Item "Key-?"
search backward
.IP "Key-n" 4
.IX Item "Key-n"
find next match
.IP "Key-N" 4
.IX Item "Key-N"
find previous match
.IP "Key-u" 4
.IX Item "Key-u"
up half screen
.IP "Key-d" 4
.IX Item "Key-d"
down half screen
.IP "Key-Return" 4
.IX Item "Key-Return"
down one line
.IP "Key-h" 4
.IX Item "Key-h"
invoke help window
.SH "OPTIONS"
.IX Header "OPTIONS"
.IP "Name:     \fBfixedFont\fR" 4
.IX Item "Name: fixedFont"
.PD 0
.IP "Class:    \fBFixedFont\fR" 4
.IX Item "Class: FixedFont"
.IP "Switch:   \fB\-font\fR" 4
.IX Item "Switch: -font"
.PD
Set the font of the viewer widget. This is by default a fixed font.
.IP "Name:     \fBsearchCase\fR" 4
.IX Item "Name: searchCase"
.PD 0
.IP "Class:    \fBSearchCase\fR" 4
.IX Item "Class: SearchCase"
.IP "Switch:   \fB\-searchcase\fR" 4
.IX Item "Switch: -searchcase"
.PD
Set if searching should be done case-insensitive. Defaults to true.
.IP "Switch:   \fB\-helpcommand\fR" 4
.IX Item "Switch: -helpcommand"
Sets the command for the \*(L"h\*(R" (help) key.
.SH "METHODS"
.IX Header "METHODS"
.ie n .IP "Load($file, %args)" 4
.el .IP "Load($file, \f(CW%args\fR)" 4
.IX Item "Load($file, %args)"
Load \fI\f(CI$file\fI\fR into the widget. \fI\f(CI%args\fI\fR may be one of the following
.RS 4
.ie n .IP "\-encoding => \fI\fI$encoding\fI\fR" 4
.el .IP "\-encoding => \fI\f(CI$encoding\fI\fR" 4
.IX Item "-encoding => $encoding"
Assume the encoding of the file to be \fI\f(CI$encoding\fI\fR. If none is given,
then assume no encoding (which is equivalent to iso\-8859\-1).
.RE
.RS 4
.RE
.IP "AddQuitBindings" 4
.IX Item "AddQuitBindings"
Convenience method to add the bindinds Key-q and Control-Key-q to
close the Toplevel window containing this More widget.
.SH "BUGS"
.IX Header "BUGS"
Besides that most of more bindings are not implemented. This bugs
me most (high to low priority):
.PP
* better status line implementation
.PP
* Cursor movement: up/down move displayed area regardless where
  insert cursor is
.PP
* add History, Load, Search (also as popup menu)
.SH "SEE ALSO"
.IX Header "SEE ALSO"
Tk::ROText, \fImore\fR\|(1), tkmore, \fIless\fR\|(1)
.SH "AUTHOR"
.IX Header "AUTHOR"
Achim Bohnet <\fIach@mpe.mpg.de\fR>
.PP
Currently maintained by Slaven Rezic <\fIslaven@rezic.de\fR>.
.PP
Copyright (c) 1997\-1998 Achim Bohnet. All rights reserved.  This program is
free software; you can redistribute it and/or modify it under the same
terms as Perl itself.