Fixed output file glitch

plk · Dec 20, 2012 · 7f12f54 · 7f12f54
1 parent 49a959d
commit 7f12f54
Showing 1 changed file with 4 additions and 2 deletions.
diff --git a/bin/biber b/bin/biber
@@ -198,8 +198,10 @@ else {
   if (Biber::Config->getoption('output_format') eq 'dot') { # .dot output
     $outfile = $bcf =~ s/bcf$/dot/r;
   }
-  elsif (Biber::Config->getoption('tool_datatype') eq 'bibtex') { # tool .bib output
-    $outfile = $ARGV[0] =~ s/.bib$/_bibertool.bib/r;
+  elsif (Biber::Config->getoption('tool')) {
+    if (Biber::Config->getoption('tool_datatype') eq 'bibtex') { # tool .bib output
+      $outfile = $ARGV[0] =~ s/.bib$/_bibertool.bib/r;
+    }
   }
   else { # .bbl output
     $outfile = $bcf =~ s/bcf$/bbl/r;