# -----------------------------------------------------------------------------
# tk.pl
# Desc: Default guidance script; loads and intializes the Tk interface
# -----------------------------------------------------------------------------

use Milkbone::Hooks qw(create_logon_prompt pre_mainloop mainloop
		       post_mainloop protocol_signon);

Milkbone->init;

load_plugin "Tk-GUI";

load_plugin "Tk-About";
load_plugin "Tk-AddBuddy";
load_plugin "Tk-BList";
load_plugin "Tk-Convo";
load_plugin "Tk-Chat";
load_plugin "Tk-Conf";
load_plugin "Tk-File";
load_plugin "Tk-Logon";
load_plugin "Tk-PluginsConf";
load_plugin "Tk-Profile";

load_plugin "Net-OSCAR";

create_logon_prompt;

pre_mainloop;
mainloop;
post_mainloop;

1;