Merge pull request #24 from tolot27/5bec27b43ccdc94537575f26dd93d5e49…

…b14e5d1 fixes #16 (only first occurrence of a match group parameter is replaced)
GMOD · May 15, 2013 · 3370bef · 3370bef
2 parents 626feac + 5bec27b
commit 3370bef
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/lib/Bio/Graphics/Browser2.pm b/lib/Bio/Graphics/Browser2.pm
@@ -363,7 +363,7 @@ sub data_source_path {
       my $path = $self->resolve_path($self->setting("=~".$regex_key=>'path'),'config');
       my @matches = ($dsn =~ /$regex_key/);
       for (my $i = 1; $i <= scalar(@matches); $i++) {
-	  $path =~ s/\$$i/$matches[$i-1]/;
+	  $path =~ s/\$$i/$matches[$i-1]/g;
       }
       return $self->resolve_path($path, 'config');
   }