view release on metacpan or  search on metacpan

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

use Tk::Balloon;
use Tk::Canvas;
use Tk::Font;
use Tk::Trace;
use Tk::PNG;
use Tk::JPEG;
use Tk::Photo;
use MIME::Base64;
use Carp;

use base qw(Tk::Derived Tk::Canvas);

use constant PI => 3.1415926;
use constant PI_OVER_2 => 1.5707963;
use constant SQUARE_EDGE_FACTOR => 1.5;

our $VERSION = '0.10';

our $hasgd;			# has GD & GD::Text
our $hasw32n2f;		# has Win32::Font::NameToFile