*** empty log message ***

Milkbone.pm

@@ -14,8 +14,8 @@ use strict;
 use warnings;
 
 use Carp qw(longmess);
-use PAR;
 use Milkbone::HookEntry;
+use Milkbone::AllHooks;
 use Benchmark;
 
 our $VERSION = "0.355";

build-temp.bat

@@ -1,4 +1 @@
-cd plugins
-perl compress_dist.pl
-cd ..
-perlapp --nocompress --lib lib --verbose --icon images\mbone.ico --force --xclude mos.pl --freestanding --exe milkbone.exe --trim POSIX --add Tk;Tk::Photo;Tk::Text;Tk::TextUndo;Tk::ROText;Tk::HList;Tk::Tree;Tk::ItemStyle;Tk::LabEntry;Socket;Digest::MD5;Win32::API;Win32::GuiTest;Tk::Font;UNIVERSAL;Win32::Sound;Winamp::Control;Tk::BrowseEntry
+perlapp --nocompress --lib lib --verbose --icon images\mbone.ico --force --xclude mos.pl --freestanding --exe milkbone.exe --trim POSIX --add Tk;Tk::Photo;Tk::Text;Tk::TextUndo;Tk::ROText;Tk::HList;Tk::Tree;Tk::ItemStyle;Tk::LabEntry;Socket;Digest::MD5;Win32::API;Win32::GuiTest;Tk::Font;UNIVERSAL;Win32::Sound;Winamp::Control;Tk::BrowseEntry;Tk::FastSplash

build.bat

@@ -1,5 +1,2 @@
-cd plugins
-perl compress_dist.pl
-cd ..
-perlapp --nocompress --gui --lib lib --verbose --icon images\mbone.ico --force --xclude mos.pl --freestanding --exe milkbone.exe --trim POSIX --add Tk;Tk::Photo;Tk::Text;Tk::TextUndo;Tk::ROText;Tk::HList;Tk::Tree;Tk::ItemStyle;Tk::LabEntry;Socket;Digest::MD5;Win32::API;Win32::GuiTest;Tk::Font;Winamp::Control;Tk::BrowseEntry;Win32::Sound
+perlapp --nocompress --gui --lib lib --verbose --icon images\mbone.ico --force --xclude mos.pl --freestanding --exe milkbone.exe --trim POSIX --add Tk;Tk::Photo;Tk::Text;Tk::TextUndo;Tk::ROText;Tk::HList;Tk::Tree;Tk::ItemStyle;Tk::LabEntry;Socket;Digest::MD5;Win32::API;Win32::GuiTest;Tk::Font;Winamp::Control;Tk::BrowseEntry;Win32::Sound;Tk::FastSplash
 upx milkbone.exe 

docs/VERSION.txt

@@ -1,6 +1,8 @@
 0.355
 --
 
+* Errors are handled a little more smoothly
+* Compiled with PDK 5.2 (EXE size is roughly 50% smaller)
 * Experimental mosh guidance script
 * deregister_hook no longer clears all handlers registered on a hookname (hehe - oops)
 * No more PAR packages - 50% decrease in loadup time + easier modification of source

plugins/Tk-Convo/Tk-Convo.pl

@@ -15,6 +15,8 @@ register_hook("create_convo", sub {
 	my $buddy = $ARGS{-user};
 	my $convo;
 
+        print "IN CREATE_CONVO\n";
+	
  	return if(exists $convos{$buddy});
         $convos{$buddy} = 1;
 

plugins/Tk-GUI/Tk-GUI.pl

@@ -70,7 +70,7 @@ register_hook("error", sub {
 	my $text = $ARGS{-short};
 	($text) = $text =~ m/^(.*?)\n/;
 	my $error_box = $mw->Toplevel(-title => "Milkbone Error");
-	$error_box->Label(-text => $ARGS{-short})->pack;
+	$error_box->Label(-text => $ARGS{-short}, -wraplength => 200)->pack;
 	$error_box->Button(-text => "OK", -command => [sub {
 		my ($self, $fatal) = @_;
 		$self->destroy;