ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/deliantra/Deliantra-Client/DC/UI/MessageWindow.pm
(Generate patch)

Comparing deliantra/Deliantra-Client/DC/UI/MessageWindow.pm (file contents):
Revision 1.15 by root, Fri Aug 17 21:27:33 2007 UTC vs.
Revision 1.16 by elmex, Sat Aug 18 10:01:16 2007 UTC

70 70
71 my $bb = CFPlus::UI::ButtonBin->new (tooltip => $chaninfo->{tooltip}); 71 my $bb = CFPlus::UI::ButtonBin->new (tooltip => $chaninfo->{tooltip});
72 $cv->{c_tab} = $bb; 72 $cv->{c_tab} = $bb;
73 73
74 $bb->add (my $vb = CFPlus::UI::Box->new); 74 $bb->add (my $vb = CFPlus::UI::Box->new);
75 $bb->connect (activate => sub { $self->unhighlight_channel ($id); 0 });
76 $vb->add ( 75 $vb->add (
77 my $b = CFPlus::UI::Label->new ( 76 my $b = CFPlus::UI::Label->new (
78 expand => 1, markup => clr_def ($chaninfo->{title}), valign => 0, align => 0 77 expand => 1, markup => clr_def ($chaninfo->{title}), valign => 0, align => 0
79 ) 78 )
80 ); 79 );
148 my $tab = $page->{_tab_button}; 147 my $tab = $page->{_tab_button};
149 my $label; 148 my $label;
150 149
151 if (defined $page->{_chat_id}) { 150 if (defined $page->{_chat_id}) {
152 $label = $self->{channel_info}->{$page->{_chat_id}}->{title}; 151 $label = $self->{channel_info}->{$page->{_chat_id}}->{title};
152 $self->unhighlight_channel ($page->{_chat_id});
153 } 153 }
154 154
155 $label = "Log" unless defined $label; 155 $label = "Log" unless defined $label;
156 156
157 $tab->set_markup (clr_act ($label)); 157 $tab->set_markup (clr_act ($label));

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines