""

plugins/Tk-BList/Milkbone/BList.pm

@@ -279,7 +279,7 @@ sub init
 
 	$self->{tree} = $self->Scrolled("MBTree" =>
 		-scrollbars => 'oe',
-		-background => 'white', -font => hook("tk_get_default_font") .  ' 10 medium', -fg => 'black', -selectborderwidth => 0,
+		-background => 'white', -font => hook("tk_get_default_font") .  ' 9 medium', -fg => 'black', -selectborderwidth => 0,
 		-itemtype => 'imagetext', -highlightthickness => 0, -drawbranch => 0, -indicator => 1,
 		-selectbackground => "darkblue", -selectforeground => "white", -ignoreinvoke => 1,
 		-selectmode => 'single', -itemtype => 'imagetext', -indent => 14,
@@ -288,13 +288,13 @@ sub init
 	$self->{tree}->Subwidget("yscrollbar")->configure(-width => 15);
 
 	$self->{group_style} = $self->{tree}->ItemStyle('imagetext', 
-		-background => 'white', -font => hook("tk_get_default_font") . ' 10 bold', -fg => 'black', 
+		-background => 'white', -font => hook("tk_get_default_font") . ' 9 bold', -fg => 'black', 
 		-selectbackground => "white", -selectforeground => "white", -stylename => 'group');
 	$self->{changed_style} = $self->{tree}->ItemStyle('imagetext', 
-		-background => 'white', -font => hook("tk_get_default_font") . ' 10', -fg => 'red', 
+		-background => 'white', -font => hook("tk_get_default_font") . ' 9', -fg => 'red', 
 		-selectbackground => "darkblue", -selectforeground => "white", -stylename => 'changed');
 	$self->{normal_style} = $self->{tree}->ItemStyle('imagetext', 
-		-background => 'white', -font => hook("tk_get_default_font") . ' 10', -fg => 'black', 
+		-background => 'white', -font => hook("tk_get_default_font") . ' 9', -fg => 'black', 
 		-selectbackground => "darkblue", -selectforeground => "white", -stylename => 'normal');
 
 	$self->{away_button} = "Away Message";