| … | |
… | |
| 248 | $scale->set_draw_value (0); |
248 | $scale->set_draw_value (0); |
| 249 | $scale->set_digits (0); |
249 | $scale->set_digits (0); |
| 250 | |
250 | |
| 251 | $self->{moveadj}->signal_connect (value_changed => sub { $self->update_board }); |
251 | $self->{moveadj}->signal_connect (value_changed => sub { $self->update_board }); |
| 252 | } |
252 | } |
| 253 | |
|
|
| 254 | $self->{boardbox}->add ($self->{board} = new Gtk2::GoBoard size => $self->{size}); |
|
|
| 255 | |
253 | |
| 256 | $vbox->pack_start ((my $hbox = new Gtk2::HBox 1), 0, 1, 0); |
254 | $vbox->pack_start ((my $hbox = new Gtk2::HBox 1), 0, 1, 0); |
| 257 | |
255 | |
| 258 | $hbox->add ($self->{userpanel}[$_] = new game::userpanel colour => $_) |
256 | $hbox->add ($self->{userpanel}[$_] = new game::userpanel colour => $_) |
| 259 | for COLOUR_WHITE, COLOUR_BLACK; |
257 | for COLOUR_WHITE, COLOUR_BLACK; |
| … | |
… | |
| 422 | $self->{user}[COLOUR_BLACK] = $self->{user1}; |
420 | $self->{user}[COLOUR_BLACK] = $self->{user1}; |
| 423 | $self->{user}[COLOUR_WHITE] = $self->{user2}; |
421 | $self->{user}[COLOUR_WHITE] = $self->{user2}; |
| 424 | |
422 | |
| 425 | # show board |
423 | # show board |
| 426 | if ($self->is_inprogress) { |
424 | if ($self->is_inprogress) { |
| 427 | $self->{left}->add ($self->{boardbox}) unless $self->{boardbox}->parent; |
425 | if (!$self->{boardbox}->parent) { |
|
|
426 | $self->{boardbox}->add ($self->{board} = new Gtk2::GoBoard size => $self->{size}); |
|
|
427 | $self->{left}->add ($self->{boardbox}); |
|
|
428 | } |
| 428 | if (my $ch = delete $self->{challenge}) { |
429 | if (my $ch = delete $self->{challenge}) { |
| 429 | (delete $_->{inlay})->clear for values %$ch; |
430 | (delete $_->{inlay})->clear for values %$ch; |
| 430 | } |
431 | } |
| 431 | } |
432 | } |
| 432 | |
433 | |
