Skip to content

Commit

Permalink
Gtk3::Table->new calls: provide third arg
Browse files Browse the repository at this point in the history
Defaulted to 0, so each case might yet need to be changed.

Updates #770
  • Loading branch information
shawnlaffan committed Nov 1, 2020
1 parent c41136f commit 1bb4c74
Show file tree
Hide file tree
Showing 6 changed files with 8 additions and 8 deletions.
6 changes: 3 additions & 3 deletions lib/Biodiverse/GUI/BasedataImport.pm
Original file line number Diff line number Diff line change
Expand Up @@ -1147,7 +1147,7 @@ sub show_expl_dialog {

my $text_wrapper = Text::Wrapper->new( columns => 90 );

my $table = Gtk3::Table->new( 1 + scalar keys %$expl_hash, 2 );
my $table = Gtk3::Table->new( 1 + scalar keys %$expl_hash, 2, 0 );
$table->set_row_spacings(5);
$table->set_col_spacings(5);

Expand Down Expand Up @@ -1588,7 +1588,7 @@ sub make_columns_dialog {
$dlg->vbox->pack_start( $label, 0, 0, 0 );

# Make table
my $table = Gtk3::Table->new( $num_columns + 1, 8 );
my $table = Gtk3::Table->new( $num_columns + 1, 8, 0 );
$table->set_row_spacings(5);
$table->set_col_spacings(20);

Expand Down Expand Up @@ -1982,7 +1982,7 @@ sub make_remap_columns_dialog {
$dlg->vbox->pack_start( $label, 0, 0, 0 );

# Make table
my $table = Gtk3::Table->new( $num_columns + 1, 8 );
my $table = Gtk3::Table->new( $num_columns + 1, 8, 0 );
$table->set_row_spacings(5);
$table->set_col_spacings(20);

Expand Down
2 changes: 1 addition & 1 deletion lib/Biodiverse/GUI/GUIManager.pm
Original file line number Diff line number Diff line change
Expand Up @@ -1091,7 +1091,7 @@ sub show_describe_dialog {
my $table_widget;
if (is_ref($description)) {
my $row_count = scalar @$description;
my $table = Gtk3::Table->new( $row_count, 2 );
my $table = Gtk3::Table->new( $row_count, 2, 0 );

my $i = 0;
foreach my $row (@$description) {
Expand Down
2 changes: 1 addition & 1 deletion lib/Biodiverse/GUI/MatrixImport.pm
Original file line number Diff line number Diff line change
Expand Up @@ -259,7 +259,7 @@ sub make_columns_dialog_normal {
$dlg->vbox->pack_start( $label, 0, 0, 0 );

# Make table
my $table = Gtk3::Table->new( 4, $num_columns + 1 );
my $table = Gtk3::Table->new( 4, $num_columns + 1, 0 );
$table->set_row_spacings(5);

#$table->set_col_spacings(20);
Expand Down
2 changes: 1 addition & 1 deletion lib/Biodiverse/GUI/PhylogenyImport.pm
Original file line number Diff line number Diff line change
Expand Up @@ -411,7 +411,7 @@ sub make_columns_dialog {
$dlg->vbox->pack_start( $label, 0, 0, 0 );

# make table
my $table = Gtk3::Table->new( 4, $num_columns + 1 );
my $table = Gtk3::Table->new( 4, $num_columns + 1, 0 );
$table->set_row_spacings(5);

#$table->set_col_spacings(20);
Expand Down
2 changes: 1 addition & 1 deletion lib/Biodiverse/GUI/SpatialParams.pm
Original file line number Diff line number Diff line change
Expand Up @@ -256,7 +256,7 @@ sub run_options_dialogue {
}


my $table = Gtk3::Table->new(2, 2);
my $table = Gtk3::Table->new(2, 2, 0);
$table->set_row_spacings(5);
$table->set_col_spacings(20);

Expand Down
2 changes: 1 addition & 1 deletion lib/Biodiverse/GUI/Tabs/Spatial.pm
Original file line number Diff line number Diff line change
Expand Up @@ -2193,7 +2193,7 @@ sub run_options_dialogue {
}


my $table = Gtk3::Table->new(2, 2);
my $table = Gtk3::Table->new(2, 2, 0);
$table->set_row_spacings(5);
$table->set_col_spacings(20);

Expand Down

0 comments on commit 1bb4c74

Please sign in to comment.