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 strict;
use warnings;
use Carp;
use vars qw($VERSION);
$VERSION = '0.69';

use Tk;
use Math::Round;
use Text::Patch;
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>

.