view release on metacpan or  search on metacpan

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

		}
        *{__PACKAGE__."::LOGCROAK"} = *LOGCROAK;
        *{__PACKAGE__."::LOGCONFESS"} = *Carp::confess;
	}

    require Exporter;    # Exporting Tk's MainLoop so that
    @ISA    = ( "Exporter", );    # I can just use strict and Tk::Wizard without
    @EXPORT = ("MainLoop");       # having to use Tk
}

use base qw[ Tk::Derived Tk::Toplevel ];
Tk::Widget->Construct('Wizard');

# See INTERNATIONALISATION
%LABELS = (
    # Buttons
    BACK   => "< Back",
    NEXT   => "Next >",
    FINISH => "Finish",
    CANCEL => "Cancel",
    HELP   => "Help",