You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
32 lines
727 B
32 lines
727 B
# ----------------------------------------------------------------------------- |
|
# 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;
|
|
|