.\" Automatically generated by Pod::Man 4.14 (Pod::Simple 3.40)
.\"
.\" 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 >0, 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 "Curses::UI::Common 3pm"
.TH Curses::UI::Common 3pm "2021-01-01" "perl v5.32.0" "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"
Curses::UI::Common \- Common methods for Curses::UI
.SH "CLASS HIERARCHY"
.IX Header "CLASS HIERARCHY"
.Vb 1
\& Curses::UI::Common \- base class
.Ve
.SH "SYNOPSIS"
.IX Header "SYNOPSIS"
.Vb 1
\&    package MyPackage;
\&
\&    use Curses::UI::Common;
\&    use vars qw(@ISA);
\&    @ISA = qw(Curses::UI::Common);
.Ve
.SH "DESCRIPTION"
.IX Header "DESCRIPTION"
Curses::UI::Common is a collection of methods that is
shared between Curses::UI classes.
.SH "METHODS"
.IX Header "METHODS"
.SS "Various methods"
.IX Subsection "Various methods"
.IP "\(bu" 4
\&\fBparent\fR ( )
.Sp
Returns the data member \f(CW$this\fR\->{\fB\-parent\fR}.
.IP "\(bu" 4
\&\fBroot\fR ( )
.Sp
Returns the topmost \fB\-parent\fR (the Curses::UI instance).
.IP "\(bu" 4
\&\fBdelallwin\fR ( )
.Sp
This method will walk through all the data members of the
class intance. Each data member that is a Curses::Window
descendant will be removed.
.IP "\(bu" 4
\&\fBaccessor\fR ( \s-1NAME,\s0 [\s-1VALUE\s0] )
.Sp
If \s-1VALUE\s0 is set, the value for the data member \f(CW$this\fR\->{\s-1NAME\s0} 
will be changed. The method will return the current value for
data member \f(CW$this\fR\->{\s-1NAME\s0}.
.IP "\(bu" 4
\&\fBkeys_to_lowercase\fR ( \s-1HASHREF\s0 )
.Sp
All keys in the hash referred to by \s-1HASHREF\s0 will be 
converted to lower case.
.SS "Text processing"
.IX Subsection "Text processing"
.IP "\fBsplit_to_lines\fR ( \s-1TEXT\s0 )" 4
.IX Item "split_to_lines ( TEXT )"
This method will split \s-1TEXT\s0 into a list of separate lines.
It returns a reference to this list.
.IP "\fBscrlength\fR ( \s-1LINE\s0 )" 4
.IX Item "scrlength ( LINE )"
Returns the screenlength of the string \s-1LINE.\s0 The difference
with the perl function \fBlength()\fR is that this method will
expand \s-1TAB\s0 characters. It is exported by this class and it may
be called as a stand-alone routine.
.IP "\fBtext_dimension\fR ( \s-1TEXT\s0 )" 4
.IX Item "text_dimension ( TEXT )"
This method will return an array containing the width 
(the length of the longest line) and the height (the
number of lines) of the \s-1TEXT.\s0
.IP "\fBtext_wrap\fR ( \s-1LINE, LENGTH, WORDWRAP\s0 )" 4
.IX Item "text_wrap ( LINE, LENGTH, WORDWRAP )"
.PD 0
.IP "\fB\s-1WORDWRAP\s0\fR ( )" 4
.IX Item "WORDWRAP ( )"
.IP "\fB\s-1NO_WORDWRAP\s0\fR ( )" 4
.IX Item "NO_WORDWRAP ( )"
.PD
This method will wrap a line of text (\s-1LINE\s0) to a 
given length (\s-1LENGTH\s0). If the \s-1WORDWRAP\s0 argument is
true, wordwrap will be enabled (this is the default
for \s-1WORDWRAP\s0). It will return a reference to a list
of wrapped lines. It is exported by this class and it may
be called as a stand-alone routine.
.Sp
The \fB\s-1WORDWRAP\s0\fR and \fB\s-1NO_WORDWRAP\s0\fR routines will
return the correct value vor the \s-1WORDWRAP\s0 argument.
These routines are exported by this class.
.Sp
Example:
.Sp
.Vb 1
\&    $this\->text_wrap($line, 50, NO_WORDWRAP);
.Ve
.SS "Reading key input"
.IX Subsection "Reading key input"
.IP "\fB\s-1CUI_ESCAPE\s0\fR ( )" 4
.IX Item "CUI_ESCAPE ( )"
.PD 0
.IP "\fB\s-1CUI_TAB\s0\fR ( )" 4
.IX Item "CUI_TAB ( )"
.IP "\fB\s-1CUI_SPACE\s0\fR ( )" 4
.IX Item "CUI_SPACE ( )"
.PD
These are a couple of routines that are not defined by the
Curses module, but which might be useful anyway. 
These routines are exported by this class.
.IP "\fBget_key\fR ( \s-1BLOCKTIME, CURSOR\s0 )" 4
.IX Item "get_key ( BLOCKTIME, CURSOR )"
This method will try to read a key from the keyboard.
It will return the key pressed or \-1 if no key was 
pressed. It is exported by this class and it may
be called as a stand-alone routine.
.Sp
The \s-1BLOCKTIME\s0 argument can be used to set
the curses halfdelay (the time to wait before the
routine decides that no key was pressed). \s-1BLOCKTIME\s0 is
given in tenths of seconds. The default is 0 (non-blocking
key read).
.Sp
Example:
.Sp
.Vb 1
\&    my $key = $this\->get_key(5)
.Ve
.SH "SEE ALSO"
.IX Header "SEE ALSO"
Curses::UI
.SH "AUTHOR"
.IX Header "AUTHOR"
Copyright (c) 2001\-2002 Maurice Makaay. All rights reserved.
.PP
Maintained by Marcus Thiesen (marcus@cpan.thiesenweb.de)
.PP
This package is free software and is provided \*(L"as is\*(R" without express
or implied warranty. It may be used, redistributed and/or modified
under the same terms as perl itself.