… | |
… | |
67 | my $as = $map->get ($mx, $my); |
67 | my $as = $map->get ($mx, $my); |
68 | |
68 | |
69 | my $arch = $as->[-1] |
69 | my $arch = $as->[-1] |
70 | or return; |
70 | or return; |
71 | |
71 | |
72 | $GCE::MainWindow::MAINWIN->update_attr_editor ($arch, 1); |
72 | $GCE::MainWindow::MAINWIN->update_attr_editor ($arch); |
73 | |
73 | |
74 | } elsif ($event->button == 1) { |
74 | } elsif ($event->button == 1) { |
75 | |
75 | |
76 | my ($mx, $my) = $map->coord ($event->x, $event->y); |
76 | my ($mx, $my) = $map->coord ($event->x, $event->y); |
77 | my $as = $map->get ($mx, $my); |
77 | my $as = $map->get ($mx, $my); |