|
|
|
@ -295,7 +295,7 @@ sub init
@@ -295,7 +295,7 @@ sub init
|
|
|
|
|
-selectbackground => "darkblue", -selectforeground => "white", -stylename => 'changed'); |
|
|
|
|
$self->{normal_style} = $self->{tree}->ItemStyle('imagetext', |
|
|
|
|
-background => 'white', -font => hook("tk_get_default_font") . ' 9', -fg => 'black', |
|
|
|
|
-selectbackground => "darkblue", -selectforeground => "white", -stylename => 'changed'); |
|
|
|
|
-selectbackground => "darkblue", -selectforeground => "white", -stylename => 'normal'); |
|
|
|
|
|
|
|
|
|
$self->{away_button} = "Away Message"; |
|
|
|
|
|
|
|
|
|