diff --git a/lib/Biodiverse/GUI/BasedataImport.pm b/lib/Biodiverse/GUI/BasedataImport.pm index 8feeddd46..ea1966a46 100644 --- a/lib/Biodiverse/GUI/BasedataImport.pm +++ b/lib/Biodiverse/GUI/BasedataImport.pm @@ -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); @@ -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); @@ -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); diff --git a/lib/Biodiverse/GUI/GUIManager.pm b/lib/Biodiverse/GUI/GUIManager.pm index 0d9038f31..13c2c6d8d 100644 --- a/lib/Biodiverse/GUI/GUIManager.pm +++ b/lib/Biodiverse/GUI/GUIManager.pm @@ -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) { diff --git a/lib/Biodiverse/GUI/MatrixImport.pm b/lib/Biodiverse/GUI/MatrixImport.pm index daf35b015..c5d79e46c 100644 --- a/lib/Biodiverse/GUI/MatrixImport.pm +++ b/lib/Biodiverse/GUI/MatrixImport.pm @@ -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); diff --git a/lib/Biodiverse/GUI/PhylogenyImport.pm b/lib/Biodiverse/GUI/PhylogenyImport.pm index a5579128d..9b02af074 100644 --- a/lib/Biodiverse/GUI/PhylogenyImport.pm +++ b/lib/Biodiverse/GUI/PhylogenyImport.pm @@ -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); diff --git a/lib/Biodiverse/GUI/SpatialParams.pm b/lib/Biodiverse/GUI/SpatialParams.pm index 0805c2b1c..c81f85796 100644 --- a/lib/Biodiverse/GUI/SpatialParams.pm +++ b/lib/Biodiverse/GUI/SpatialParams.pm @@ -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); diff --git a/lib/Biodiverse/GUI/Tabs/Spatial.pm b/lib/Biodiverse/GUI/Tabs/Spatial.pm index 9248a3259..8af6e8e76 100644 --- a/lib/Biodiverse/GUI/Tabs/Spatial.pm +++ b/lib/Biodiverse/GUI/Tabs/Spatial.pm @@ -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);