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

Comparing deliantra/gde/GCE/EditAction.pm (file contents):
Revision 1.32 by elmex, Tue Apr 4 11:29:54 2006 UTC vs.
Revision 1.33 by elmex, Tue Apr 4 13:05:51 2006 UTC

 sub init {
    my ($self) = @_;
    my $vb = new Gtk2::VBox;
-   $vb->pack_start ($self->{only_attr} = Gtk2::CheckButton->new ('pick attr'), 0, 1, 0);
    $self->{widget} = $vb;
 }
 sub begin {
    my ($self, $map, $x, $y) = @_;
    $self->edit ($map, $x, $y);
 }
 sub edit {
    my ($self, $map, $x, $y) = @_;
-   $::MAINWIN->update_stack_view ($map, $x, $y);
    my $cstack = $map->get ($x, $y);
    my $arch = $cstack->[-1];
       $x    = $arch->{virtual_x};
       $y    = $arch->{virtual_y};
       $arch = $arch->{_virtual};
       $cstack = $map->get ($x, $y);
    }
-#   unless ($self->{only_attr}->get_active) {
-#      $::MAINWIN->set_pick ($arch)
-#         if @$cstack;
-#   }
    $::MAINWIN->update_attr_editor ($arch, sub {
       $map->change_begin (ref $self);
       $map->change_stack ($x, $y, $cstack);
       # XXX: Put this into a generic function!!! See also EditTools.pm
          splice @{ $map->{undo_stack} ||= [] },
                 $map->{undo_stack_pos}++, 1e6,
                 $changeset;
       }
    });
+   $::MAINWIN->update_stack_view ($map, $x, $y);
 }
 sub end {}
 package GCE::EditAction::Perl;

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