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

Added Esc close capability for save as.

Browse Source
This commit is contained in:
freesource 2001-11-30 02:26:43 +00:00
parent 3c073ca3dd
commit 9d2ffa3a89
2 changed files with 22 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

13
BootRoot/YardBox.pm
View File

@ -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 {

9
gbootroot
View File

@ -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');