bike/gbootroot
1
0
Fork 0
mirror of https://github.com/fspc/gbootroot.git synced 2025-02-23 09:03:23 -05:00
Code Issues Projects Releases Wiki Activity

Decided against Esc for closing the Yard Box .. Alt-W is sufficient and safer.

Browse Source
This commit is contained in:
freesource 2001-11-30 04:45:34 +00:00
parent 0248fba79e
commit f3666f6ee2
1 changed files with 10 additions and 9 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

19
BootRoot/YardBox.pm
View File

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