From a1f417ffe601da3eb7b4302ee4de506ea8178477 Mon Sep 17 00:00:00 2001 From: milkbone57 Date: Mon, 8 Sep 2003 02:59:04 +0000 Subject: [PATCH] "" --- plugins/Tk-BList/Milkbone/BList.pm | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/plugins/Tk-BList/Milkbone/BList.pm b/plugins/Tk-BList/Milkbone/BList.pm index 963f190..588f6a3 100644 --- a/plugins/Tk-BList/Milkbone/BList.pm +++ b/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";