correct drag_region contents for :region and :overview tracks, was pr…

…inting the track's label instead of its key
GMOD · Nov 29, 2011 · c03356a · c03356a
1 parent 74a879a
commit c03356a
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/lib/Bio/Graphics/Browser2/RenderPanels.pm b/lib/Bio/Graphics/Browser2/RenderPanels.pm
@@ -519,7 +519,7 @@ sub wrap_rendered_track {
     }
     else {
 	(my $l = $label) =~ s/:\w+$//;
-	$title = $source->setting($l=>'key') || $label;
+	$title = $source->setting( $label => 'key') || $l;
     }
     $title =~ s/:(overview|region|detail)$//;