From 46341195cc9162f124a39d14f52808bc4ade2443 Mon Sep 17 00:00:00 2001
From: milkbone57 <milkbone57>
Date: Fri, 18 Jul 2003 20:15:54 +0000
Subject: [PATCH] *** empty log message ***

---
 docs/VERSION.txt         | 4 ++--
 mb.conf                  | 2 +-
 plugins/Tk-GUI/Tk-GUI.pl | 3 ++-
 3 files changed, 5 insertions(+), 4 deletions(-)

diff --git a/docs/VERSION.txt b/docs/VERSION.txt
index fde37bc..35009d8 100644
--- a/docs/VERSION.txt
+++ b/docs/VERSION.txt
@@ -21,7 +21,7 @@
 * Monitor can be used to send messages to cell phones
 * Monitor now works (even with SMTP authentication)
 * Plugin reloading works pretty darned well
-* Uses ~/.milkbone on Linux, AppData on Win2K, XP, etc. and profiles on Win98, etc.; needs testing on NT
+* Uses ~/.milkbone on *NIX, AppData on Win2K, XP, etc. and profiles on Win98, etc.; I have no idea what it does on NT
 * Reloading of the core (Milkbone.pm) is now supported
 * mb.conf is only saved if changed
 * Reloading of plugins works
@@ -29,7 +29,7 @@
 * Sounds off by default
 * Cleaned out some useless files
 * Removed some useless sounds
-* Now runs on Perl 5.6 on non-Win32 machines
+* Now runs on Perl 5.6 on non-Win32 machines (the Win32 installer includes teh 5.8 interpreter)
 * Tray icon now allows hiding and showing of windows (enabled by default)
 * XAMP rewritten
 * Timeout renamed to AwayTimeout
diff --git a/mb.conf b/mb.conf
index 51af1a3..db8f4cb 100644
--- a/mb.conf
+++ b/mb.conf
@@ -1,7 +1,7 @@
 # mb.conf - milkbone global configuration file
 
 Goodbye sorry, gotta, go
-Modules Tk-PluginsConf, Net-OSCAR, Tk-GUI, Tk-Logon, Tk-BList, Tk-Profile, Tk-File, Tk-About, Tk-AddBuddy, Tk-Convo
+Modules Tk-PluginsConf, Net-OSCAR, Tk-GUI, Tk-Logon, Tk-BList, Tk-Profile, Tk-File, Tk-About, Tk-Convo
 Plugins Sound, XAMP, Templog, Monitor, Counterstrike
 Port 5190
 HeavyLogging 0
diff --git a/plugins/Tk-GUI/Tk-GUI.pl b/plugins/Tk-GUI/Tk-GUI.pl
index 4fff340..c26d3c1 100644
--- a/plugins/Tk-GUI/Tk-GUI.pl
+++ b/plugins/Tk-GUI/Tk-GUI.pl
@@ -22,7 +22,8 @@ $mw->OnDestroy(\&on_destroy);
 $mw->optionAdd("*font", "-*-arial-norma-r-*-*-*-120-*-*-*-*-*-*");
 $mw->optionAdd("*borderWidth", 1);
 $mw->optionAdd("*highlightThickness", 0);
-$mw->optionAdd("*background", option("ThemeColor"));
+
+$mw->optionAdd("*background", option("ThemeColor")) if(option("ThemeColor"));
 
 my $icon = $mw->Photo(-file => path("images/icon.bmp"));