mirror of
https://github.com/fspc/gbootroot.git
synced 2025-02-22 08:33:24 -05:00
Makes the submit button the default for the replacements box.
This commit is contained in:
parent
04e2351a58
commit
52fbcbfaff
@ -1845,8 +1845,8 @@ sub Replacements {
|
||||
#_______________________________________
|
||||
# Submit button
|
||||
my $submit_b = button(0,1,2,3,"Submit",$table_replacements);
|
||||
#$submit_b->can_default($true);
|
||||
#$submit_b->grab_default();
|
||||
$submit_b->can_default($true);
|
||||
$submit_b->grab_default();
|
||||
$submit_b->signal_connect( "clicked", sub {
|
||||
if ($entry[0] && $entry[1]) {
|
||||
|
||||
|
Loading…
x
Reference in New Issue
Block a user