view release on metacpan or  search on metacpan

lib/Tk/XText.pm  view on Meta::CPAN

package Tk::XText;

=head1 NAME

Tk::XText - Extended Text widget

=cut

use vars qw($VERSION);
$VERSION = '0.68';
use strict;
use warnings;
use Carp;

use Tk;
use Math::Round;
require Tk::DialogBox;
require Tk::LabFrame;
require Tk::Spinbox;
require Tk::HList;

use base qw(Tk::Derived Tk::Text);
Construct Tk::Widget 'XText';

#boilerplating for auto complete facilities
my %delimhash = (	'.',	1, '(', 1, ')',	1, ':',	1, '!',	1, '+',	1, ',',	1, '-',	1, '<',	1, '=',
	1, '>',	1, '%',	1, '&',	1, '*', 1, '"', 1, '\'', 1,	'/',	1, ';',	1, '?',	1, '[',	1, ']',	1,
	'^',	1, '{',	1, '|',	1, '}',	1, '~',	1, '\\', 1, '$', 1, '@', 1, '#', 1, '`', 1, ' ', 1, "\t", 1
);

=head1 SYNOPSIS

 require Tk::XText;
 my $text= $window->XText(@options)->pack;

=head1 DESCRIPTION

B<Tk::XText> inherits L<Tk::Text>. It adds an advanced Undo/Redo stack, 
facilities for indenting and unindenting, commenting and uncommenting, 
autocomplete and autoindent, loading, saving and exporting.

It's main purpose is to serve as the text widget in the L<Tk::CodeText> 
mega widget.

The options and methods below are only documented if they are not available
within the L<Tk::CodeText> context. Otherwise see there.

=head1 OPTIONS

=over 4

=item Name: B<acPopSize>

=item Class: B<AcPopSize>

=item Switch: B<-acpopsize>

.

=item Name: B<acScanSize>

=item Class: B<AcScanSize>

=item Switch: B<-acscansize>

.

=item Name: B<activeDelay>

=item Class: B<ActiveDelay>

=item Switch: B<-activedelay>

.

=item Name: B<autoBrackets>

=item Class: B<AutoBrackets>

=item Switch: B<-autobrackets>

.