… | |
… | |
18 | |
18 | |
19 | $self->update_info ($self->{info}); |
19 | $self->update_info ($self->{info}); |
20 | |
20 | |
21 | $vbox->add ($self->{txt} = new DC::UI::TextScroller ( |
21 | $vbox->add ($self->{txt} = new DC::UI::TextScroller ( |
22 | expand => 1, |
22 | expand => 1, |
23 | font => $::FONT_FIXED, |
23 | font => $::FONT_PROP, |
24 | fontsize => $::CFG->{log_fontsize}, |
24 | fontsize => $::CFG->{log_fontsize}, |
25 | indent => -4, |
25 | indent => -4.35, # hack |
26 | can_hover => 1, |
26 | can_hover => 1, |
27 | can_events => 1, |
27 | can_events => 1, |
28 | max_par => $::CFG->{logview_max_par}, |
28 | max_par => $::CFG->{logview_max_par}, |
29 | tooltip => $self->{text_tooltip}, |
29 | tooltip => $self->{text_tooltip}, |
30 | )); |
30 | )); |
… | |
… | |
166 | $self->clear_log; |
166 | $self->clear_log; |
167 | } |
167 | } |
168 | |
168 | |
169 | my $time = sprintf "%02d:%02d:%02d", (localtime time)[2,1,0]; |
169 | my $time = sprintf "%02d:%02d:%02d", (localtime time)[2,1,0]; |
170 | |
170 | |
171 | $para->{markup} = "<span foreground='#ffffff'>$time</span> $para->{markup}"; |
171 | $para->{markup} = "<span foreground='#ffffff'><tt>$time </tt></span>$para->{markup}"; |
172 | |
172 | |
173 | my $txt = $self->{txt}; |
173 | my $txt = $self->{txt}; |
174 | $txt->add_paragraph ($para); |
174 | $txt->add_paragraph ($para); |
175 | $txt->scroll_to_bottom; |
175 | $txt->scroll_to_bottom; |
176 | } |
176 | } |