| … | … | ||
|---|---|---|---|
| 435 | do_n_dialog (sub { $::CONN->send ("move $targ $self->{tag} $_[0]") }) | 435 | do_n_dialog (sub { $::CONN->send ("move $targ $self->{tag} $_[0]") }) |
| 436 | } | 436 | } |
| 437 | ] | 437 | ] |
| 438 | ) | 438 | ) |
| 439 | ), | 439 | ), |
| 440 | ["bind <i>apply $self->{name}</i> to a key" => sub { $::BIND_EDITOR->do_quick_binding (["apply $self->{name}"]) }], | ||
| 440 | ); | 441 | ); |
| 441 | 442 | ||
| 442 | CFPlus::UI::Menu->new (items => \@menu_items)->popup ($ev); | 443 | CFPlus::UI::Menu->new (items => \@menu_items)->popup ($ev); |
| 443 | } | 444 | } |
| 444 | 445 |
| – | Removed lines |
| + | Added lines |
| < | Changed lines |
| > | Changed lines |