| … | |
… | |
| 142 | next if $_ eq $page; |
142 | next if $_ eq $page; |
| 143 | $_->{_active} = 0; |
143 | $_->{_active} = 0; |
| 144 | } |
144 | } |
| 145 | $page->{_active} = 1; |
145 | $page->{_active} = 1; |
| 146 | |
146 | |
| 147 | # $label = "Log" unless defined $label; |
|
|
| 148 | |
|
|
| 149 | # $tab->set_markup (clr_act ($label)); |
|
|
| 150 | |
|
|
| 151 | $self->update_tabs; |
147 | $self->update_tabs; |
| 152 | # for ($self->{nb}->pages) { |
|
|
| 153 | # next if $_ eq $page; |
|
|
| 154 | # next if $_->{_channel_highlighted}; |
|
|
| 155 | |
|
|
| 156 | # my $tab = $_->{_tab_label}; |
|
|
| 157 | # next unless $tab; |
|
|
| 158 | |
|
|
| 159 | # my $label; |
|
|
| 160 | |
|
|
| 161 | # if (defined $_->{_chat_id}) { |
|
|
| 162 | # $label = $self->{channel_info}->{$_->{_chat_id}}->{title}; |
|
|
| 163 | # } |
|
|
| 164 | |
|
|
| 165 | # $label = "Log" unless defined $label; |
|
|
| 166 | |
|
|
| 167 | # $tab->set_markup (clr_def ($label)); |
|
|
| 168 | # } |
|
|
| 169 | } |
148 | } |
| 170 | |
149 | |
| 171 | sub update_tabs { |
150 | sub update_tabs { |
| 172 | my ($self) = @_; |
151 | my ($self) = @_; |
| 173 | |
152 | |
| … | |
… | |
| 246 | |
225 | |
| 247 | if ($para->{color_flags} & NDI_REPLY) { |
226 | if ($para->{color_flags} & NDI_REPLY) { |
| 248 | $self->{nb}->set_current_page ($cv); |
227 | $self->{nb}->set_current_page ($cv); |
| 249 | } |
228 | } |
| 250 | |
229 | |
|
|
230 | if ($para->{color_flags} & NDI_CLEAR) { |
|
|
231 | $cv->clear; |
|
|
232 | } |
| 251 | } |
233 | } |
| 252 | |
234 | |
| 253 | $self->{chatviews}->{$id}->message ($para); |
235 | $self->{chatviews}->{$id}->message ($para); |
| 254 | |
236 | |
| 255 | } else { |
237 | } else { |
