| … | |
… | |
| 266 | $vbox->pack_start ((my $frame = new Gtk2::Frame), 0, 1, 0); |
266 | $vbox->pack_start ((my $frame = new Gtk2::Frame), 0, 1, 0); |
| 267 | |
267 | |
| 268 | { |
268 | { |
| 269 | $frame->add (my $vbox = new Gtk2::VBox); |
269 | $frame->add (my $vbox = new Gtk2::VBox); |
| 270 | $vbox->add ($self->{title} = new Gtk2::Label "-"); |
270 | $vbox->add ($self->{title} = new Gtk2::Label "-"); |
|
|
271 | $self->{title}->set (visible => 0, no_show_all => 1); # workaround for refresh-bug |
| 271 | |
272 | |
| 272 | $vbox->add (my $hbox = new Gtk2::HBox); |
273 | $vbox->add (my $hbox = new Gtk2::HBox); |
| 273 | |
274 | |
| 274 | $hbox->pack_start (($self->{board_label} = new Gtk2::Label), 0, 0, 0); |
275 | $hbox->pack_start (($self->{board_label} = new Gtk2::Label), 0, 0, 0); |
| 275 | |
276 | |
| … | |
… | |
| 511 | my $title = defined $self->{channel} |
512 | my $title = defined $self->{channel} |
| 512 | ? $self->owner->as_string . " " . $self->opponent_string |
513 | ? $self->owner->as_string . " " . $self->opponent_string |
| 513 | : "Game Window"; |
514 | : "Game Window"; |
| 514 | $self->set_title ("KGS Game $title"); |
515 | $self->set_title ("KGS Game $title"); |
| 515 | $self->{title}->set_text ($title); # title gets redrawn wrongly |
516 | $self->{title}->set_text ($title); # title gets redrawn wrongly |
|
|
517 | $self->{title}->show; # workaround for refresh-bug |
| 516 | |
518 | |
| 517 | $self->{rules_inlay}->refresh; |
519 | $self->{rules_inlay}->refresh; |
| 518 | |
520 | |
| 519 | if (exists $self->{teacher}) { |
521 | if (exists $self->{teacher}) { |
| 520 | $self->{teacher_inlay} ||= $self->{chat}->new_inlay; |
522 | $self->{teacher_inlay} ||= $self->{chat}->new_inlay; |
