… | |
… | |
24 | { |
24 | { |
25 | my @tags = ( |
25 | my @tags = ( |
26 | [default => { foreground => "black" }], |
26 | [default => { foreground => "black" }], |
27 | [node => { foreground => "#0000b0", event => 1 }], |
27 | [node => { foreground => "#0000b0", event => 1 }], |
28 | [move => { foreground => "#0000b0", event => 1 }], |
28 | [move => { foreground => "#0000b0", event => 1 }], |
29 | [user => { foreground => "#0000b0", event => 1 }], |
29 | [user => { foreground => "#0000b0", wrap_mode => "none", event => 1 }], |
30 | [coord => { foreground => "#0000b0", event => 1 }], |
30 | [coord => { foreground => "#0000b0", event => 1 }], |
31 | [score => { foreground => "#0000b0", event => 1 }], |
31 | [score => { foreground => "#0000b0", event => 1 }], |
32 | [error => { foreground => "#ff0000", event => 1 }], |
32 | [error => { foreground => "#ff0000", event => 1 }], |
33 | [leader => { weight => 800 }], |
33 | [leader => { weight => 800, pixels_above_lines => 6 }], |
34 | [header => { weight => 800, pixels_above_lines => 6 }], |
34 | [header => { weight => 800, pixels_above_lines => 6 }], |
35 | [undo => { foreground => "#ffff00", background => "#ff0000", weight => 800, pixels_above_lines => 6 }], |
35 | [undo => { foreground => "#ffff00", background => "#ff0000", weight => 800, pixels_above_lines => 6 }], |
36 | [challenge => { weight => 800, pixels_above_lines => 6, background => "#ffffb0" }], |
36 | [challenge => { weight => 800, pixels_above_lines => 6, background => "#ffffb0" }], |
37 | [description => { weight => 800, foreground => "blue" }], |
37 | [description => { weight => 800, foreground => "blue" }], |
38 | [infoblock => { weight => 700, foreground => "blue" }], |
38 | [infoblock => { weight => 700, foreground => "blue" }], |
… | |
… | |
61 | $self->{widget} = new Gtk2::ScrolledWindow; |
61 | $self->{widget} = new Gtk2::ScrolledWindow; |
62 | $self->{widget}->set_policy("never", "always"); |
62 | $self->{widget}->set_policy("never", "always"); |
63 | $self->pack_start ($self->{widget}, 1, 1, 0); |
63 | $self->pack_start ($self->{widget}, 1, 1, 0); |
64 | |
64 | |
65 | $self->{widget}->add ($self->{view} = new_with_buffer Gtk2::TextView $self->{buffer}); |
65 | $self->{widget}->add ($self->{view} = new_with_buffer Gtk2::TextView $self->{buffer}); |
66 | $self->{view}->set_wrap_mode ("word"); |
66 | $self->{view}->set_wrap_mode ("word-char"); |
67 | $self->{view}->set_cursor_visible (0); |
67 | $self->{view}->set_cursor_visible (0); |
68 | |
68 | |
69 | $self->{view}->set_editable (0); |
69 | $self->{view}->set_editable (0); |
70 | |
70 | |
71 | $self->{view}->signal_connect (motion_notify_event => sub { |
71 | $self->{view}->signal_connect (motion_notify_event => sub { |