… | |
… | |
197 | my $w = $self->{attr_edit_win} = Gtk2::Window->new; |
197 | my $w = $self->{attr_edit_win} = Gtk2::Window->new; |
198 | $w->set_title ("gce - edit attrs"); |
198 | $w->set_title ("gce - edit attrs"); |
199 | $w->add ($self->{attr_edit} = GCE::AttrEdit->new); |
199 | $w->add ($self->{attr_edit} = GCE::AttrEdit->new); |
200 | $w->signal_connect (destroy => sub { Gtk2->main_quit; 0 }); |
200 | $w->signal_connect (destroy => sub { Gtk2->main_quit; 0 }); |
201 | |
201 | |
202 | main::set_pos_and_size ($w, $main::CFG->{attr_view}, 200, 200); |
202 | main::set_pos_and_size ($w, $main::CFG->{attr_view}, 400, 300); |
203 | |
203 | |
204 | $w->show_all; |
204 | $w->show_all; |
205 | } |
205 | } |
206 | |
206 | |
207 | sub update_attr_editor { |
207 | sub update_attr_editor { |