Browse Source

Added Esc close capability for save as.

master
freesource 23 years ago
parent
commit
9d2ffa3a89
  1. 13
      BootRoot/YardBox.pm
  2. 9
      gbootroot

13
BootRoot/YardBox.pm

@ -809,6 +809,15 @@ 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 {
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_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" );
@ -1899,6 +1908,10 @@ File Shortcuts
Alt-N New Template Alt-N New Template
Ctrl-S Save File Ctrl-S Save File
Alt-A Save As File Alt-A Save As File
Yard Box Shortcuts
Esc Close Yard Box
SHORTCUTS SHORTCUTS
sub path { sub path {

9
gbootroot

@ -1805,6 +1805,15 @@ sub save_as {
$save_as = Gtk::Dialog->new(); $save_as = Gtk::Dialog->new();
$save_as->signal_connect("destroy", \&destroy_window, \$save_as); $save_as->signal_connect("destroy", \&destroy_window, \$save_as);
$save_as->signal_connect("delete_event", \&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->set_title("Save As");
$save_as->border_width(12); $save_as->border_width(12);
$save_as->set_position('center'); $save_as->set_position('center');

Loading…
Cancel
Save