diff --git a/BootRoot/YardBox.pm b/BootRoot/YardBox.pm index 233d5bc..e56f215 100644 --- a/BootRoot/YardBox.pm +++ b/BootRoot/YardBox.pm @@ -809,6 +809,15 @@ 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; + } + } + }, + ); $main::yard_window->set_usize( 525, 450 ); $main::yard_window->set_policy( $true, $true, $false ); $main::yard_window->set_title( "Yard Box - $template" ); @@ -1899,6 +1908,10 @@ File Shortcuts Alt-N New Template Ctrl-S Save File Alt-A Save As File + +Yard Box Shortcuts + + Esc Close Yard Box SHORTCUTS sub path { diff --git a/gbootroot b/gbootroot index 604523f..b2df96a 100755 --- a/gbootroot +++ b/gbootroot @@ -1805,6 +1805,15 @@ sub save_as { $save_as = Gtk::Dialog->new(); $save_as->signal_connect("destroy", \&destroy_window, \$save_as); $save_as->signal_connect("delete_event", \&destroy_window, \$save_as); + $save_as->signal_connect("key_press_event", sub { + my $event = pop @_; + if ($event->{'keyval'}) { + if ($event->{'keyval'} == 65307) { + $save_as->destroy; + } + } + }, + ); $save_as->set_title("Save As"); $save_as->border_width(12); $save_as->set_position('center');