… | |
… | |
61 | |
61 | |
62 | $self->{text}->set_text(KGS::Listener::Debug::dumpval([$self->{board}{time},$self->{board}{captures}]). $self->{board}{comment}); |
62 | $self->{text}->set_text(KGS::Listener::Debug::dumpval([$self->{board}{time},$self->{board}{captures}]). $self->{board}{comment}); |
63 | }); |
63 | }); |
64 | } |
64 | } |
65 | |
65 | |
66 | #d#TYPOE |
|
|
67 | $vbox->pack_start((my $aspect_frame = gtk_aspect_frame_new Gtk2::AspectFrame "", 0.5, 0.5, 1, 0), 1, 1, 0); |
66 | $vbox->pack_start((my $aspect_frame = new Gtk2::AspectFrame "", 0.5, 0.5, 1, 0), 1, 1, 0); |
68 | $aspect_frame->set (border_width => 0); |
67 | $aspect_frame->set (border_width => 0, shadow_type => 'none', label_xalign => 0.5); |
69 | $aspect_frame->set (shadow_type => 'none'); |
|
|
70 | $self->{board_label} = $aspect_frame->get_label_widget; |
68 | $self->{board_label} = $aspect_frame->get_label_widget; |
71 | |
69 | |
72 | $aspect_frame->add($self->{canvas} = new Gtk2::DrawingArea); |
70 | $aspect_frame->add($self->{canvas} = new Gtk2::DrawingArea); |
73 | $self->{canvas}->double_buffered (0); |
71 | $self->{canvas}->double_buffered (0); |
74 | |
72 | |