NAME

UI::Various::Tk::Main - concrete implementation of UI::Various::Main

SYNOPSIS

# This module should never be used directly!
# It is used indirectly via the following:
use UI::Various::Main;

ABSTRACT

This module is the specific implementation of UI::Various::Main for Perl-Tk. It manages and hides everything specific to Tk.

DESCRIPTION

The documentation of this module is only intended for developers of the package itself.

FUNCTIONS

_init - initialisation

UI::Various::Tk::Main::_init($self);

example:

$_ = UI::Various::core::ui . '::Main::_init';
{   no strict 'refs';   &$_($self);   }

parameters:

$self               reference to object of abstract parent class

description:

Prepare the interface to Tk. (It's under FUNCTIONS as it's called before the object is re-blessed as UI::Various::Tk::Main.)

METHODS

mainloop - main event loop of an application

Tk's concrete implementation of UI::Various::Main::mainloop

It is split into two internal functions for unit testing. (It will not be called that often to make this a performance issue. :-)

window - add new window to application

Tk's overload of UI::Various::Main::window. If the Mainloop of Tk is running, we need to directly prepare and show the window / dialogue.

SEE ALSO

UI::Various, UI::Various::Main

LICENSE

Copyright (C) Thomas Dorner.

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself. See LICENSE file for more details.

AUTHOR

Thomas Dorner <dorner (at) cpan (dot) org>