… | |
… | |
77 | |
77 | |
78 | my $w = $self->{last_map_window} = GCE::MapEditor->new; |
78 | my $w = $self->{last_map_window} = GCE::MapEditor->new; |
79 | |
79 | |
80 | $w->open_map ($mapfile); |
80 | $w->open_map ($mapfile); |
81 | |
81 | |
82 | ::set_pos_and_size ($w, $main::CFG->{map_window}); |
82 | ::set_pos_and_size ($w, $main::CFG->{map_window}, 500, 500, 200, 0); |
83 | |
83 | |
84 | $w->show_all; |
84 | $w->show_all; |
85 | # my $w = $self->{last_map_window} = Gtk2::Window->new ('toplevel'); |
85 | # my $w = $self->{last_map_window} = Gtk2::Window->new ('toplevel'); |
86 | # $w->set_title ('gce - map editor'); |
86 | # $w->set_title ('gce - map editor'); |
87 | # $w->add (my $mapedit = $self->{mapedit} = new GCE::MapEditor); |
87 | # $w->add (my $mapedit = $self->{mapedit} = new GCE::MapEditor); |
… | |
… | |
99 | my $w = $self->{sv_win} = Gtk2::Window->new ('toplevel'); |
99 | my $w = $self->{sv_win} = Gtk2::Window->new ('toplevel'); |
100 | $w->set_title ('gce - stack view'); |
100 | $w->set_title ('gce - stack view'); |
101 | $w->signal_connect (delete_event => sub { delete $self->{sv}; 0 }); |
101 | $w->signal_connect (delete_event => sub { delete $self->{sv}; 0 }); |
102 | $w->add ($self->{sv} = GCE::StackView->new); |
102 | $w->add ($self->{sv} = GCE::StackView->new); |
103 | |
103 | |
104 | main::set_pos_and_size ($w, $main::CFG->{stack_view}); |
104 | main::set_pos_and_size ($w, $main::CFG->{stack_view}, 150, 250); |
105 | |
105 | |
106 | $w->show_all; |
106 | $w->show_all; |
107 | } |
107 | } |
108 | |
108 | |
109 | sub show_attr_editor { |
109 | sub show_attr_editor { |
… | |
… | |
114 | my $w = $self->{attr_edit_win} = Gtk2::Window->new; |
114 | my $w = $self->{attr_edit_win} = Gtk2::Window->new; |
115 | $w->set_title ("gce - edit attrs"); |
115 | $w->set_title ("gce - edit attrs"); |
116 | $w->add ($self->{attr_edit} = GCE::AttrEdit->new); |
116 | $w->add ($self->{attr_edit} = GCE::AttrEdit->new); |
117 | $w->signal_connect (delete_event => sub { delete $self->{attr_edit}; 0 }); |
117 | $w->signal_connect (delete_event => sub { delete $self->{attr_edit}; 0 }); |
118 | |
118 | |
119 | main::set_pos_and_size ($w, $main::CFG->{attr_view}); |
119 | main::set_pos_and_size ($w, $main::CFG->{attr_view}, 200, 200); |
120 | |
120 | |
121 | $w->show_all; |
121 | $w->show_all; |
122 | } |
122 | } |
123 | |
123 | |
124 | sub update_attr_editor { |
124 | sub update_attr_editor { |
… | |
… | |
152 | $p->signal_connect ('delete-event' => sub { |
152 | $p->signal_connect ('delete-event' => sub { |
153 | $self->{open_pick_windows}->[$idx] = undef; |
153 | $self->{open_pick_windows}->[$idx] = undef; |
154 | }); |
154 | }); |
155 | |
155 | |
156 | if ($layout) { |
156 | if ($layout) { |
157 | main::set_pos_and_size ($p, $layout->{p_and_s}); |
157 | main::set_pos_and_size ($p, $layout->{p_and_s}, 200, 200); |
158 | } |
158 | } |
159 | |
159 | |
160 | $p->show_all; |
160 | $p->show_all; |
161 | |
161 | |
162 | $p->set_selection ($layout->{selection}); |
162 | $p->set_selection ($layout->{selection}); |
… | |
… | |
345 | |
345 | |
346 | $self->signal_connect ('delete-event' => sub { |
346 | $self->signal_connect ('delete-event' => sub { |
347 | Gtk2->main_quit; |
347 | Gtk2->main_quit; |
348 | }); |
348 | }); |
349 | |
349 | |
350 | ::set_pos_and_size ($self, $main::CFG->{main_window}); |
350 | ::set_pos_and_size ($self, $main::CFG->{main_window}, 150, 200, 0, 0); |
351 | } |
351 | } |
352 | |
352 | |
353 | sub new_cb { |
353 | sub new_cb { |
354 | my ($self) = @_; |
354 | my ($self) = @_; |
355 | warn "new map not yet implemented\n"; |
355 | warn "new map not yet implemented\n"; |