|
@ -809,15 +809,16 @@ sub yard_box { |
|
|
$search_window->destroy if $search_window; } ); |
|
|
$search_window->destroy if $search_window; } ); |
|
|
$main::yard_window->signal_connect("delete_event", sub { |
|
|
$main::yard_window->signal_connect("delete_event", sub { |
|
|
$search_window->destroy if $search_window; }); |
|
|
$search_window->destroy if $search_window; }); |
|
|
$main::yard_window->signal_connect("key_press_event", sub { |
|
|
# Probably not such a good idea, but interesting to try |
|
|
my $event = pop @_; |
|
|
## $main::yard_window->signal_connect("key_press_event", sub { |
|
|
if ($event->{'keyval'}) { |
|
|
## my $event = pop @_; |
|
|
if ($event->{'keyval'} == 65307) { |
|
|
## if ($event->{'keyval'}) { |
|
|
$main::yard_window->destroy; |
|
|
## if ($event->{'keyval'} == 65307) { |
|
|
} |
|
|
## $main::yard_window->destroy; |
|
|
} |
|
|
## } |
|
|
}, |
|
|
## } |
|
|
); |
|
|
## }, |
|
|
|
|
|
## ); |
|
|
$main::yard_window->set_usize( 525, 450 ); |
|
|
$main::yard_window->set_usize( 525, 450 ); |
|
|
$main::yard_window->set_policy( $true, $true, $false ); |
|
|
$main::yard_window->set_policy( $true, $true, $false ); |
|
|
$main::yard_window->set_title( "Yard Box - $template" ); |
|
|
$main::yard_window->set_title( "Yard Box - $template" ); |
|
|