""

build.bat

@@ -1,2 +1,2 @@
-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;Win32::GUI;integer;Net::SMTP;constant;Fcntl;Win32::Process
+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;Win32::GUI;integer;Net::SMTP;constant;Fcntl;Win32::Process;File::Path
 upx milkbone.exe 

docs/VERSION.txt

@@ -2,7 +2,7 @@
 --
 
 * Timestamps work again
-* Logging works
+* Logging works (and is enabled by default)
 * Multiple styles in BrowseEdit
 * More font-tweaking
 * Fixed the %a - %s bug (thanks Dan)

plugins/Tk-GUI/Tk/BrowseEdit.pm

@@ -65,17 +65,17 @@ $self]);
                 )->pack(-pady => 0, -side => 'left', -fill => 'both');
         $self->bind('<Control-U>', [sub { shift->{'<b>'}->invoke; }, $self]);
 
-        $self->{'<back>'} = $self->{panel}->Button(-text => 'back', -relief => 'flat', -background => 'blue',
+#        $self->{'<back>'} = $self->{panel}->Button(-text => 'back', -relief => 'flat', -background => 'blue',
-				-activebackground => 'blue',
+#				-activebackground => 'blue',
-                -font => $self->Font(-family => 'times', -size => '8'),
+#                -font => $self->Font(-family => 'times', -size => '8'),
-                -command => [sub {
+#                -command => [sub {
-                        my ($self) = @_;
+#                        my ($self) = @_;
-						my $color = $self->pick_color;
+#						my $color = $self->pick_color;
-						return if $color eq "NOTACOLOR";
+#						return if $color eq "NOTACOLOR";
-		      
+#		      
-                        $self->toggleTag("<font back=\"$color\">", '<back>');
+#                        $self->toggleTag("<font back=\"$color\">", '<back>');
-                }, $self]
+#                }, $self]
-                )->pack(-pady => 0, -side => 'left', -fill => 'both');
+#                )->pack(-pady => 0, -side => 'left', -fill => 'both');
         $self->bind('<Control-U>', [sub { shift->{'<b>'}->invoke; }, $self]);
 
         $self->{text}->tagConfigure('elide', -elide => 1);