Browse Source

This closes the save_as box when Esc is pressed, and associated New Template

with 103.
master
freesource 23 years ago
parent
commit
39adac66a8
  1. 16
      BootRoot/YardBox.pm

16
BootRoot/YardBox.pm

@ -81,7 +81,7 @@ my @menu_items = ( { path => '/File',
{ path => '/File/_New Template', { path => '/File/_New Template',
accelerator => '<alt>N', accelerator => '<alt>N',
callback => \&saved, callback => \&saved,
action => 100 }, action => 103 },
{ path => '/File/file_separator', { path => '/File/file_separator',
type => '<Separator>' }, type => '<Separator>' },
{ path => '/File/_Save', { path => '/File/_Save',
@ -1183,7 +1183,7 @@ sub saved {
return if $error && $error eq "ERROR"; return if $error && $error eq "ERROR";
} }
} }
elsif ($whoami == 101) { elsif ($whoami == 101 || $whoami == 103) {
save_as(); save_as();
} }
@ -1581,7 +1581,8 @@ sub yard_menu {
} }
# This will just be a simple dialog # This will just be a simple dialog, and doubles as New Template as
# well as Save As
my $write_over; my $write_over;
sub save_as { sub save_as {
@ -1592,6 +1593,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