[ViewVC] Diff of: cvs/deliantra/gde/GCE/MainWindow.pm

Comparing deliantra/gde/GCE/MainWindow.pm (file contents):
Revision 1.24 by root, Tue Feb 21 18:06:35 2006 UTC vs.
Revision 1.25 by root, Tue Feb 21 18:18:35 2006 UTC

    # XXX: last_map_window is a dirty trick to get the position and size
    # for save layout
    my $w = $self->{last_map_window} = GCE::MapEditor->new;
    $w->open_map ($mapfile);
-   main::set_pos_and_size ($w, $main::CFG->{map_window});
+   ::set_pos_and_size ($w, $main::CFG->{map_window});
    $w->show_all;
 #   my $w = $self->{last_map_window} = Gtk2::Window->new ('toplevel');
 #   $w->set_title ('gce - map editor');
 #   $w->add (my $mapedit = $self->{mapedit} = new GCE::MapEditor);
    ::set_pos_and_size ($self, $main::CFG->{main_window});
 }
 sub new_cb {
    my ($self) = @_;
-   die "NOT IMPLEMENTED YET";
+   warn "new map not yet implemented\n";
 }
-sub open_cb {
+sub new_filechooser {
    my ($self) = @_;
-   my $fc =
-      Gtk2::FileChooserDialog->new (
+   my $fc = new Gtk2::FileChooserDialog (
          'gce - open map', undef, 'open', 'gtk-cancel' => 'cancel', 'gtk-ok' => 'ok'
       );
    $fc->add_shortcut_folder ("$Crossfire::LIB/maps");
    $fc->add_shortcut_folder ($_) for keys %{$self->{fc_last_folders}};
    $fc->set_current_folder  ($self->{fc_last_folder} || "$Crossfire::LIB/maps");
+   $fc
+}
+sub open_cb {
+   my ($self) = @_;
+   my $fc = $self->new_filechooser;
    if ('ok' eq $fc->run) {
       $self->{fc_last_folder} = $fc->get_current_folder;
       $self->{fc_last_folders}->{$self->{fc_last_folder}}++;

-–
+Removed lines
-+
+Added lines
-<
+Changed lines
->
+Changed lines