Merge pull request #903 from shawnlaffan/issue_933_sp_branch_colouring

GUI Spatial tab: support branch colouring using any spatial output across the project
shawnlaffan · Dec 31, 2023 · c4485d5 · c4485d5
2 parents 8278513 + 6c14981
commit c4485d5
Show file tree

Hide file tree

Showing 3 changed files with 234 additions and 112 deletions.
diff --git a/lib/Biodiverse/GUI/Legend.pm b/lib/Biodiverse/GUI/Legend.pm
@@ -1160,6 +1160,13 @@ sub set_text_marks_for_labels {
     return;
 }
 
+sub set_log_mode {
+    croak "boolean arg not passed"
+      if @_ < 2;
+    my ($self, $bool) = @_;
+
+    return $self->{log_mode} = $bool ? 1 : 0;
+}
 
 sub set_log_mode_on {
     my ($self) = @_;
@@ -1225,7 +1232,7 @@ sub set_colour_mode_from_list_and_index {
         $self->{categorical}{labels}  = $labels;
         foreach my $key (keys %$colours) {
             my $colour = $colours->{$key};
-            $colours->{$key} => Gtk2::Gdk::Color->parse($colour);
+            $colours->{$key} = Gtk2::Gdk::Color->parse($colour);
         }
         $self->{categorical}{colours} = $colours;
     }